summaryrefslogtreecommitdiff
path: root/lisp/calendar/time-date.el
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2019-07-31 19:21:50 -0700
committerPaul Eggert <eggert@cs.ucla.edu>2019-07-31 19:24:13 -0700
commitf8f1c8c33a0a8fa117bf06e3b34865dea48eb6a1 (patch)
tree8848384237d3283acb0ab05770195e244cfc3216 /lisp/calendar/time-date.el
parent5f78e81af0c2648391f26602189c565627e08218 (diff)
downloademacs-f8f1c8c33a0a8fa117bf06e3b34865dea48eb6a1.tar.gz
format-time-string subsumes time-zone-format
* lisp/calendar/time-date.el (time-zone-format): * test/lisp/calendar/time-date-tests.el (test-time-zone-format): Remove. * lisp/gnus/nnrss.el (nnrss-normalize-date): Use format-time-string instead of time-zone-format.
Diffstat (limited to 'lisp/calendar/time-date.el')
-rw-r--r--lisp/calendar/time-date.el14
1 files changed, 0 insertions, 14 deletions
diff --git a/lisp/calendar/time-date.el b/lisp/calendar/time-date.el
index b94bf52760d..32ba1286895 100644
--- a/lisp/calendar/time-date.el
+++ b/lisp/calendar/time-date.el
@@ -352,20 +352,6 @@ is output until the first non-zero unit is encountered."
(<= (car here) delay)))
(concat (format "%.2f" (/ delay (car (cddr here)))) (cadr here))))))
-(defun time-zone-format (seconds &optional short)
- "Format SECONDS as a valid time zone string.
-For instance, 3600 is \"+01:00\".
-If SHORT, the colon isn't included."
- (format "%s%02d%s%02d"
- (if (< seconds 0)
- "-"
- "+")
- (/ (abs seconds) 3600)
- (if short
- ""
- ":")
- (mod (abs seconds) 3600)))
-
(defun date-days-in-month (year month)
"The number of days in MONTH in YEAR."
(if (= month 2)