summaryrefslogtreecommitdiff
path: root/lisp/calc/calc-forms.el
diff options
context:
space:
mode:
authorAndreas Schwab <schwab@suse.de>2004-02-08 22:39:49 +0000
committerAndreas Schwab <schwab@suse.de>2004-02-08 22:39:49 +0000
commit1e9a52a584bed938d6d7c0e547f4a8703f636e8e (patch)
tree8eb26ea89ad5d7b4122c000210645d570d065383 /lisp/calc/calc-forms.el
parentab5a17657222dffc19ee71e7fbdd48320312a253 (diff)
downloademacs-1e9a52a584bed938d6d7c0e547f4a8703f636e8e.tar.gz
emacs-1e9a52a584bed938d6d7c0e547f4a8703f636e8e.tar.bz2
emacs-1e9a52a584bed938d6d7c0e547f4a8703f636e8e.zip
(calc-convert-time-zones): Fix format string.
Diffstat (limited to 'lisp/calc/calc-forms.el')
-rw-r--r--lisp/calc/calc-forms.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/calc/calc-forms.el b/lisp/calc/calc-forms.el
index e5a0d6ae7fd..31f9e776a0c 100644
--- a/lisp/calc/calc-forms.el
+++ b/lisp/calc/calc-forms.el
@@ -1,6 +1,6 @@
;;; calc-forms.el --- data format conversion functions for Calc
-;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 1990, 1991, 1992, 1993, 2001, 2004 Free Software Foundation, Inc.
;; Author: David Gillespie <daveg@synaptics.com>
;; Maintainers: D. Goel <deego@gnufans.org>
@@ -212,11 +212,11 @@
", to zone: "))))
(if (stringp old) (setq old (math-read-expr old)))
(if (eq (car-safe old) 'error)
- (error "Error in expression: " (nth 1 old)))
+ (error "Error in expression: %S" (nth 1 old)))
(if (equal new "") (setq new "local"))
(if (stringp new) (setq new (math-read-expr new)))
(if (eq (car-safe new) 'error)
- (error "Error in expression: " (nth 1 new)))
+ (error "Error in expression: %S" (nth 1 new)))
(calc-enter-result 1 "tzcv" (list 'calcFunc-tzconv
(calc-top-n 1) old new)))))