aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2008-04-04 07:30:39 +0000
committerGlenn Morris2008-04-04 07:30:39 +0000
commit7fa4d82445202fe139d0bdcdf627c75e45d94890 (patch)
treef24af12a057bb70931e49884e4a9505dace1f661
parent7a6bd764df2b4c7df9ef625ac5b031f754ca248d (diff)
downloademacs-7fa4d82445202fe139d0bdcdf627c75e45d94890.tar.gz
emacs-7fa4d82445202fe139d0bdcdf627c75e45d94890.zip
(calendar-mayan-long-count-to-absolute): Keep old name as alias.
-rw-r--r--lisp/calendar/cal-mayan.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/calendar/cal-mayan.el b/lisp/calendar/cal-mayan.el
index 176e32208c3..0dd78edebfa 100644
--- a/lisp/calendar/cal-mayan.el
+++ b/lisp/calendar/cal-mayan.el
@@ -345,6 +345,9 @@ Long count is a list (baktun katun tun uinal kin)"
345 ;; Days before absolute date 0. 345 ;; Days before absolute date 0.
346 (- calendar-mayan-days-before-absolute-zero))) 346 (- calendar-mayan-days-before-absolute-zero)))
347 347
348(define-obsolete-function-alias 'calendar-absolute-from-mayan-long-count
349 'calendar-mayan-long-count-to-absolute "23.1")
350
348(defun calendar-mayan-long-count-common-era (lc) 351(defun calendar-mayan-long-count-common-era (lc)
349 "Return non-nil if long count LC represents a date in the Common Era." 352 "Return non-nil if long count LC represents a date in the Common Era."
350 (let ((base (calendar-mayan-long-count-from-absolute 1))) 353 (let ((base (calendar-mayan-long-count-from-absolute 1)))