;;; cal-french.el --- calendar functions for the French Revolutionary calendar
-;; Copyright (C) 1988, 1989, 1992, 1994, 1995, 1997, 2001, 2002, 2003,
-;; 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011
-;; Free Software Foundation, Inc.
+;; Copyright (C) 1988-1989, 1992, 1994-1995, 1997, 2001-2015 Free
+;; Software Foundation, Inc.
;; Author: Edward M. Reingold <reingold@cs.uiuc.edu>
;; Maintainer: Glenn Morris <rgm@gnu.org>
day ; days so far this month
(1- calendar-french-epoch)))) ; days before start of calendar
-(define-obsolete-function-alias 'calendar-absolute-from-french
- 'calendar-french-to-absolute "23.1")
-
(defun calendar-french-from-absolute (date)
"Compute the French Revolutionary equivalent for absolute date DATE.
The result is a list of the form (MONTH DAY YEAR).
(message "Date is pre-French Revolution")
(message "French Revolutionary date: %s" f))))
-(define-obsolete-function-alias 'calendar-print-french-date
- 'calendar-french-print-date "23.1")
-
;;;###cal-autoload
(defun calendar-french-goto-date (date &optional noecho)
"Move cursor to French Revolutionary date DATE.
(calendar-french-to-absolute date)))
(or noecho (calendar-french-print-date)))
-(define-obsolete-function-alias 'calendar-goto-french-date
- 'calendar-french-goto-date "23.1")
-
(defvar date)
;; To be called from diary-list-sexp-entries, where DATE is bound.