Mercurial > emacs

diff lisp/calc/calc-prog.el @ 58614:eba1cd703531

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calc-user-define-formula, calc-do-defmath): Replace calc-need-macros by appropriate require.
author Jay Belanger <jay.p.belanger@gmail.com>
date Mon, 29 Nov 2004 05:58:45 +0000
parents 2c8f55b9ef8a
children 827d00badeb5
line wrap: on
line diff
--- a/lisp/calc/calc-prog.el	Mon Nov 29 05:57:46 2004 +0000
+++ b/lisp/calc/calc-prog.el	Mon Nov 29 05:58:45 2004 +0000
@@ -271,7 +271,7 @@
                                    x))) calc-user-formula-alist))
      (if cmd
 	 (progn
-	   (calc-need-macros)
+	   (require 'calc-macs)
 	   (fset cmd
 		 (list 'lambda
 		       '()
@@ -1711,7 +1711,7 @@
 ;;; Compiling Lisp-like forms to use the math library.
 
 (defun math-do-defmath (func args body)
-  (calc-need-macros)
+  (require 'calc-macs)
   (let* ((fname (intern (concat "calcFunc-" (symbol-name func))))
 	 (doc (if (stringp (car body)) (list (car body))))
 	 (clargs (mapcar 'math-clean-arg args))