Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
8c34d83e
Commit
8c34d83e
authored
Apr 06, 2008
by
Glenn Morris
Browse files
Comment.
parent
4dedde3c
Changes
10
Hide whitespace changes
Inline
Side-by-side
Showing
10 changed files
with
20 additions
and
20 deletions
+20
-20
lisp/ChangeLog
lisp/ChangeLog
+7
-9
lisp/calendar/cal-china.el
lisp/calendar/cal-china.el
+1
-1
lisp/calendar/cal-coptic.el
lisp/calendar/cal-coptic.el
+2
-2
lisp/calendar/cal-french.el
lisp/calendar/cal-french.el
+1
-1
lisp/calendar/cal-iso.el
lisp/calendar/cal-iso.el
+1
-1
lisp/calendar/cal-julian.el
lisp/calendar/cal-julian.el
+2
-2
lisp/calendar/cal-mayan.el
lisp/calendar/cal-mayan.el
+1
-1
lisp/calendar/cal-persia.el
lisp/calendar/cal-persia.el
+1
-1
lisp/calendar/lunar.el
lisp/calendar/lunar.el
+2
-1
lisp/calendar/solar.el
lisp/calendar/solar.el
+2
-1
No files found.
lisp/ChangeLog
View file @
8c34d83e
...
@@ -2,22 +2,20 @@
...
@@ -2,22 +2,20 @@
* dired-aux.el (dired-overwrite-confirmed): Revert last change.
* dired-aux.el (dired-overwrite-confirmed): Revert last change.
* dired.el (dired-dnd-handle-local-file): Obey
* dired.el (dired-dnd-handle-local-file): Obey dired-backup-overwrite.
dired-backup-overwrite.
2008-04-06 Michael Kifer <kifer@cs.stonybrook.edu>
2008-04-06 Michael Kifer <kifer@cs.stonybrook.edu>
* viper*.el (viper-search-wrap-around-t):
r
eplace with
* viper*.el (viper-search-wrap-around-t):
R
eplace with
viper-search-wrap-around.
viper-search-wrap-around.
* ediff*.el:
r
eplace 3-argument 'require' statements with 1-argument
* ediff*.el:
R
eplace 3-argument 'require' statements with 1-argument
ones (wrapped in if's). For compatibility with the current stable
ones (wrapped in if's).
For compatibility with the current stable
version of XEmacs.
version of XEmacs.
2008-04-06 Dan Nicolaescu <dann@ics.uci.edu>
2008-04-06 Dan Nicolaescu <dann@ics.uci.edu>
* vc.el (vc-status-prepare-status-buffer):
* vc.el (vc-status-prepare-status-buffer): Reset vc-parent-buffer-name.
Reset vc-parent-buffer-name.
2008-04-06 Jason Rumney <jasonr@gnu.org>
2008-04-06 Jason Rumney <jasonr@gnu.org>
...
@@ -229,7 +227,7 @@
...
@@ -229,7 +227,7 @@
(calendar-chinese-goto-date): Rename calendar-goto-chinese-date.
(calendar-chinese-goto-date): Rename calendar-goto-chinese-date.
Keep old name as alias, update callers.
Keep old name as alias, update callers.
* cal-hebrew.el (calendar-hebrew-leap-year-p):
*
calendar/
cal-hebrew.el (calendar-hebrew-leap-year-p):
Rename hebrew-calendar-leap-year-p. Update callers.
Rename hebrew-calendar-leap-year-p. Update callers.
(calendar-hebrew-last-month-of-year):
(calendar-hebrew-last-month-of-year):
Rename hebrew-calendar-last-month-of-year. Update callers.
Rename hebrew-calendar-last-month-of-year. Update callers.
...
@@ -314,7 +312,7 @@
...
@@ -314,7 +312,7 @@
* calendar/cal-menu.el, calendar/calendar.el:
* calendar/cal-menu.el, calendar/calendar.el:
Update for chinese and hebrew name changes.
Update for chinese and hebrew name changes.
* diary-lib.el: Update for hebrew name changes.
*
calendar/
diary-lib.el: Update for hebrew name changes.
2008-04-05 Stefan Monnier <monnier@iro.umontreal.ca>
2008-04-05 Stefan Monnier <monnier@iro.umontreal.ca>
...
...
lisp/calendar/cal-china.el
View file @
8c34d83e
...
@@ -601,7 +601,7 @@ Echo Chinese date unless NOECHO is non-nil."
...
@@ -601,7 +601,7 @@ Echo Chinese date unless NOECHO is non-nil."
(
defvar
date
)
(
defvar
date
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-chinese-date
()
(
defun
diary-chinese-date
()
"Chinese calendar equivalent of date diary entry."
"Chinese calendar equivalent of date diary entry."
...
...
lisp/calendar/cal-coptic.el
View file @
8c34d83e
...
@@ -183,7 +183,7 @@ Echo Coptic date unless NOECHO is t."
...
@@ -183,7 +183,7 @@ Echo Coptic date unless NOECHO is t."
(
defvar
date
)
(
defvar
date
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-coptic-date
()
(
defun
diary-coptic-date
()
"Coptic calendar equivalent of date diary entry."
"Coptic calendar equivalent of date diary entry."
...
@@ -259,7 +259,7 @@ Echo Ethiopic date unless NOECHO is t."
...
@@ -259,7 +259,7 @@ Echo Ethiopic date unless NOECHO is t."
(
define-obsolete-function-alias
'calendar-goto-ethiopic-date
(
define-obsolete-function-alias
'calendar-goto-ethiopic-date
'calendar-ethiopic-goto-date
"23.1"
)
'calendar-ethiopic-goto-date
"23.1"
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-ethiopic-date
()
(
defun
diary-ethiopic-date
()
"Ethiopic calendar equivalent of date diary entry."
"Ethiopic calendar equivalent of date diary entry."
...
...
lisp/calendar/cal-french.el
View file @
8c34d83e
...
@@ -255,7 +255,7 @@ Echo French Revolutionary date unless NOECHO is non-nil."
...
@@ -255,7 +255,7 @@ Echo French Revolutionary date unless NOECHO is non-nil."
(
defvar
date
)
(
defvar
date
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-french-date
()
(
defun
diary-french-date
()
"French calendar equivalent of date diary entry."
"French calendar equivalent of date diary entry."
...
...
lisp/calendar/cal-iso.el
View file @
8c34d83e
...
@@ -147,7 +147,7 @@ Interactively, goes to the first day of the specified week."
...
@@ -147,7 +147,7 @@ Interactively, goes to the first day of the specified week."
(
defvar
date
)
(
defvar
date
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-iso-date
()
(
defun
diary-iso-date
()
"ISO calendar equivalent of date diary entry."
"ISO calendar equivalent of date diary entry."
...
...
lisp/calendar/cal-julian.el
View file @
8c34d83e
...
@@ -204,13 +204,13 @@ Echo astronomical (Julian) day number unless NOECHO is non-nil."
...
@@ -204,13 +204,13 @@ Echo astronomical (Julian) day number unless NOECHO is non-nil."
(
defvar
date
)
(
defvar
date
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-julian-date
()
(
defun
diary-julian-date
()
"Julian calendar equivalent of date diary entry."
"Julian calendar equivalent of date diary entry."
(
format
"Julian date: %s"
(
calendar-julian-date-string
date
)))
(
format
"Julian date: %s"
(
calendar-julian-date-string
date
)))
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-astro-day-number
()
(
defun
diary-astro-day-number
()
"Astronomical (Julian) day number diary entry."
"Astronomical (Julian) day number diary entry."
...
...
lisp/calendar/cal-mayan.el
View file @
8c34d83e
...
@@ -383,7 +383,7 @@ Echo Mayan date unless NOECHO is non-nil."
...
@@ -383,7 +383,7 @@ Echo Mayan date unless NOECHO is non-nil."
(
defvar
date
)
(
defvar
date
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-mayan-date
()
(
defun
diary-mayan-date
()
"Show the Mayan long count, haab, and tzolkin dates as a diary entry."
"Show the Mayan long count, haab, and tzolkin dates as a diary entry."
...
...
lisp/calendar/cal-persia.el
View file @
8c34d83e
...
@@ -211,7 +211,7 @@ Echo Persian date unless NOECHO is non-nil."
...
@@ -211,7 +211,7 @@ Echo Persian date unless NOECHO is non-nil."
(
defvar
date
)
(
defvar
date
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-persian-date
()
(
defun
diary-persian-date
()
"Persian calendar equivalent of date diary entry."
"Persian calendar equivalent of date diary entry."
...
...
lisp/calendar/lunar.el
View file @
8c34d83e
...
@@ -211,6 +211,7 @@ remainder mod 4 gives the phase: 0 new moon, 1 first quarter, 2 full moon,
...
@@ -211,6 +211,7 @@ remainder mod 4 gives the phase: 0 new moon, 1 first quarter, 2 full moon,
(
lunar-phase-list
m1
y1
)
"\n"
)))
(
lunar-phase-list
m1
y1
)
"\n"
)))
(
message
"Computing phases of the moon...done"
)))
(
message
"Computing phases of the moon...done"
)))
;; FIXME ?
;;;###autoload
;;;###autoload
(
defun
phases-of-moon
(
&optional
arg
)
(
defun
phases-of-moon
(
&optional
arg
)
"Display the quarters of the moon for last month, this month, and next month.
"Display the quarters of the moon for last month, this month, and next month.
...
@@ -226,7 +227,7 @@ This function is suitable for execution in a .emacs file."
...
@@ -226,7 +227,7 @@ This function is suitable for execution in a .emacs file."
(
defvar
date
)
(
defvar
date
)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(
defun
diary-phases-of-moon
(
&optional
mark
)
(
defun
diary-phases-of-moon
(
&optional
mark
)
...
...
lisp/calendar/solar.el
View file @
8c34d83e
...
@@ -781,6 +781,7 @@ and `calendar-time-zone' are used to interpret local time."
...
@@ -781,6 +781,7 @@ and `calendar-time-zone' are used to interpret local time."
end-long
long
)))
end-long
long
)))
(
/
(
+
start
end
)
2.0
)))
(
/
(
+
start
end
)
2.0
)))
;; FIXME but there already is solar-sunrise-sunset.
;;;###autoload
;;;###autoload
(
defun
sunrise-sunset
(
&optional
arg
)
(
defun
sunrise-sunset
(
&optional
arg
)
"Local time of sunrise and sunset for today. Accurate to a few seconds.
"Local time of sunrise and sunset for today. Accurate to a few seconds.
...
@@ -867,7 +868,7 @@ Accurate to a few seconds."
...
@@ -867,7 +868,7 @@ Accurate to a few seconds."
(defvar date)
(defvar date)
;; To be called from list-sexp-
diary-
entries, where DATE is bound.
;; To be called from
diary-
list-sexp-entries, where DATE is bound.
;;;###diary-autoload
;;;###diary-autoload
(defun diary-sunrise-sunset ()
(defun diary-sunrise-sunset ()
"
Local
time
of
sunrise
and
sunset
as
a
diary
entry.
"
Local
time
of
sunrise
and
sunset
as
a
diary
entry.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment