# HG changeset patch # User Jay Belanger # Date 1100719351 0 # Node ID 4a12728aef722f11351fb7ed929e71806e1a36a9 # Parent 7b70b40dbfc7d8e4db1517c3396f3d2a1d1e7c14 (math-defsimplify): Changed the argument in the created function to math-simplify-expr. diff -r 7b70b40dbfc7 -r 4a12728aef72 lisp/calc/calc-ext.el --- a/lisp/calc/calc-ext.el Wed Nov 17 19:21:57 2004 +0000 +++ b/lisp/calc/calc-ext.el Wed Nov 17 19:22:31 2004 +0000 @@ -3,8 +3,7 @@ ;; Copyright (C) 1990, 1991, 1992, 1993, 2001, 2002, 2004 Free Software Foundation, Inc. ;; Author: David Gillespie -;; Maintainers: D. Goel -;; Colin Walters +;; Maintainer: Jay Belanger ;; This file is part of GNU Emacs. @@ -2601,7 +2600,7 @@ (list 'get (list 'quote func) ''math-simplify) (list 'list (list 'function - (append '(lambda (expr)) + (append '(lambda (math-simplify-expr)) code))))))) (if (symbolp funcs) (list funcs) funcs)))) (put 'math-defsimplify 'lisp-indent-hook 1)