From xemacs-m  Sun Jan  5 16:28:09 1997
Received: from altair.xemacs.org (steve@xemacs.miranova.com [206.190.83.19])
          by xemacs.cs.uiuc.edu (8.8.4/8.8.4) with ESMTP
	  id QAA12729 for <xemacs-beta@xemacs.org>; Sun, 5 Jan 1997 16:28:08 -0600 (CST)
Received: (from steve@localhost)
          by altair.xemacs.org (8.8.4/8.8.4)
	  id OAA08281; Sun, 5 Jan 1997 14:38:22 -0800
Sender: steve@xemacs.org
To: xemacs-beta@xemacs.org
Subject: Re: Lazy lock broken in b34
References: <199701050718.CAA08228@spacely.icd.teradyne.com> <199701051729.KAA02964@branagh.lanl.gov> <m2loa7vlau.fsf@altair.xemacs.org> <yviarajzu67q.fsf@atreides.mindspring.com>
X-Url: http://www.miranova.com/%7Esteve/
Mail-Copies-To: never
X-Face: #!T9!#9s-3o8)*uHlX{Ug[xW7E7Wr!*L46-OxqMu\xz23v|R9q}lH?cRS{rCNe^'[`^sr5"
 f8*@r4ipO6Jl!:Ccq<xoV[Qz2u8<8-+Vwf2gzJ44lf_/y9OaQ`@#Q65{U4/TC)i2`~/M&QI$X>p:9I
 OSS'2{-)-4wBnVeg0S\O4Al@)uC[pD|+
X-Attribution: sb
From: Steven L Baur <steve@miranova.com>
In-Reply-To: Sudish Joseph's message of 05 Jan 1997 17:07:05 -0500
Mime-Version: 1.0 (generated by tm-edit 7.100)
Content-Type: text/plain; charset=US-ASCII
Date: 05 Jan 1997 14:38:17 -0800
Message-ID: <m2d8vjvjc6.fsf@altair.xemacs.org>
Lines: 26
X-Mailer: Red Gnus v0.72/XEmacs 20.0

>>>>> "Sudish" == Sudish Joseph <sudish@mindspring.com> writes:

Sudish> BTW, it'd be nice if symbol-file was interactive.  It's very useful
Sudish> while debugging.

Index: loadhist.el
===================================================================
RCS file: /usr/local/xemacs/xemacs-20.0/lisp/utils/loadhist.el,v
retrieving revision 1.1.1.1
diff -u -r1.1.1.1 loadhist.el
--- loadhist.el	1996/12/18 22:43:01	1.1.1.1
+++ loadhist.el	1997/01/05 22:35:23
@@ -34,6 +34,7 @@
 (defun symbol-file (sym)
   "Return the input source from which SYM was loaded.
 This is a file name, or nil if the source was a buffer with no associated file."
+  (interactive "S") ; XEmacs
   (catch 'foundit
     (mapcar
      (function (lambda (x) (if (memq sym (cdr x)) (throw 'foundit (car x)))))

-- 
steve@miranova.com baur
Unsolicited commercial e-mail will be billed at $250/message.
"That Bill Clinton.  He probably doesn't know how to log on to the
Internet."  -- Rush Limbaugh, noted Computer Expert

