Mercurial > emacs

diff lisp/calc/calc-ext.el @ 90188:01137c1fdbe9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-57 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 324-352) - Merge from gnus--rel--5.10 - Update from CVS - etc/emacs-buffer.gdb: Remove RCS keywords * gnus--rel--5.10 (patch 70-79) - Update from CVS - Merge from emacs--cvs-trunk--0
author Miles Bader <miles@gnu.org>
date Mon, 06 Jun 2005 02:39:45 +0000
parents f042e7c0fe20 24bf48d7bb93
children 187d6a1f84f7
line wrap: on
line diff
--- a/lisp/calc/calc-ext.el	Sun Jun 05 01:58:02 2005 +0000
+++ b/lisp/calc/calc-ext.el	Mon Jun 06 02:39:45 2005 +0000
@@ -43,6 +43,9 @@
 (defvar math-comp-sel-cpos nil)
 (defvar math-compose-hash-args nil)
 
+(defvar calc-alg-map)
+(defvar calc-alg-esc-map)
+
 ;;; The following was made a function so that it could be byte-compiled.
 (defun calc-init-extensions ()
 
@@ -1192,8 +1195,9 @@
 	   (math-normalize val)))))
 
 
-
-(if (boundp 'calc-help-map)
+(defvar calc-help-map nil)
+
+(if calc-help-map
     nil
   (setq calc-help-map (make-keymap))
   (define-key calc-help-map "b" 'calc-describe-bindings)