From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sat, 20 Apr 2019 03:28:07 +0000 (-0400)
Subject: * lisp/calendar/time-date.el (date-to-time): 'signal' only takes 2 args
X-Git-Tag: emacs-27.0.90~3181
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=cb411c609d43d3c015c9550e1fc931f6f204e90d;p=emacs.git

* lisp/calendar/time-date.el (date-to-time): 'signal' only takes 2 args
---

diff --git a/lisp/calendar/time-date.el b/lisp/calendar/time-date.el
index cc30bd1fda4..decb21e9c20 100644
--- a/lisp/calendar/time-date.el
+++ b/lisp/calendar/time-date.el
@@ -155,13 +155,13 @@ If DATE lacks timezone information, GMT is assumed."
     (error
      (let ((overflow-error '(error "Specified time is not representable")))
        (if (equal err overflow-error)
-	   (apply 'signal err)
-	 (condition-case err
+	   (signal (car err) (cdr err))
+	 (condition-case-unless-debug err
 	     (encode-time (parse-time-string
 			   (timezone-make-date-arpa-standard date)))
 	   (error
 	    (if (equal err overflow-error)
-		(apply 'signal err)
+		(signal (car err) (cdr err))
 	      (error "Invalid date: %s" date)))))))))
 
 ;;;###autoload