Mercurial > emacs

changeset 26052:b6e77fbb182b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(completion-ignored-extensions): Added ".sparcf" for CMUCL on sparc and ".ufsl" for LispWorks. (bound-and-true-p): Bugfix: free variable `v'.
author Gerd Moellmann <gerd@gnu.org>
date Sun, 17 Oct 1999 10:45:32 +0000
parents 707b9ae3f778
children d3f55e596e63
files lisp/bindings.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/bindings.el	Sun Oct 17 09:55:57 1999 +0000
+++ b/lisp/bindings.el	Sun Oct 17 10:45:32 1999 +0000
@@ -186,7 +186,7 @@
 
 (defmacro bound-and-true-p (var)
   "Return the value of symbol VAR if it is bound, else nil."
-  `(and (boundp (quote ,v)) ,var))
+  `(and (boundp (quote ,var)) ,var))
 
 (defvar mode-line-mouse-sensitive-p nil "\
 Non-nil means mode line has been made mouse-sensitive.")
@@ -287,7 +287,7 @@
 		".brn" ".rnt" ".mem" ".lni" ".lis"
 		".olb" ".tlb" ".mlb" ".hlb"))
 	     (t
-	      '(".o" "~" ".bin" ".lbin" ".fasl"
+	      '(".o" "~" ".bin" ".lbin" ".fasl" ".ufsl"
 		".a" ".ln" ".blg" ".bbl")))
        '(".elc" ".lof"
 	 ".glo" ".idx" ".lot"
@@ -298,7 +298,7 @@
 	 ;; Clisp
 	 ".fas" ".lib"
 	 ;; CMUCL
-	 ".x86f"
+	 ".x86f" ".sparcf"
 	 ;; Texinfo-related
 	 ".toc" ".log" ".aux"
 	 ".cp" ".fn" ".ky" ".pg" ".tp" ".vr"