X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/9b08ce78d24d2fac7092afe3ace0f4bbac5d1544..a1506d2977a8c2eb982ad0b59416009cdfaa6f51:/lisp/calc/calc-stuff.el diff --git a/lisp/calc/calc-stuff.el b/lisp/calc/calc-stuff.el index bea5c847c1..33f8d964e6 100644 --- a/lisp/calc/calc-stuff.el +++ b/lisp/calc/calc-stuff.el @@ -3,7 +3,8 @@ ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. ;; Author: David Gillespie -;; Maintainer: Colin Walters +;; Maintainers: D. Goel +;; Colin Walters ;; This file is part of GNU Emacs. @@ -208,7 +209,7 @@ With a prefix, push that prefix as a number onto the stack." (defun calc-clean-num (num) (interactive "P") (calc-clean (- (if num - (prefix-numeric-value num) + (prefix-numeric-value num) (if (and (>= last-command-char ?0) (<= last-command-char ?9)) (- last-command-char ?0)