2 files changed, 6 insertions, 0 deletions

diff --git a/lisp/calendar/lunar.el b/lisp/calendar/lunar.el
index 118dedfcad9..3d01fbd0ce6 100644
--- a/lisp/calendar/lunar.el
+++ b/lisp/calendar/lunar.el
@@ -184,6 +184,7 @@ remainder mod 4 gives the phase: 0 new moon, 1 first quarter, 2 full moon,
         ((= 2 phase) "Full Moon")
         ((= 3 phase) "Last Quarter Moon")))
 
+;;;###cal-autoload
 (defun calendar-phases-of-moon ()
   "Create a buffer with the lunar phases for the current calendar window."
   (interactive)
@@ -235,6 +236,7 @@ This function is suitable for execution in a .emacs file."
            (displayed-year (extract-calendar-year date)))
       (calendar-phases-of-moon))))
 
+;;;###diary-autoload
 (defun diary-phases-of-moon (&optional mark)
 "Moon phases diary entry.
 An optional parameter MARK specifies a face or single-character string to
diff --git a/lisp/calendar/solar.el b/lisp/calendar/solar.el
index 90cebd59d2e..d0b02b4b111 100644
--- a/lisp/calendar/solar.el
+++ b/lisp/calendar/solar.el
@@ -872,6 +872,7 @@ This function is suitable for execution in a .emacs file."
                   "Type \\[switch-to-buffer-other-window] RET to restore old \
 contents of temp window."))))))
 
+;;;###cal-autoload
 (defun calendar-sunrise-sunset ()
   "Local time of sunrise and sunset for date under cursor.
 Accurate to a few seconds."
@@ -886,6 +887,7 @@ Accurate to a few seconds."
 (defvar date)
 
 ;; To be called from list-sexp-diary-entries, where DATE is bound.
+;;;###diary-autoload
 (defun diary-sunrise-sunset ()
   "Local time of sunrise and sunset as a diary entry.
 Accurate to a few seconds."
@@ -894,6 +896,7 @@ Accurate to a few seconds."
   (solar-sunrise-sunset-string date))
 
 ;; To be called from list-sexp-diary-entries, where DATE is bound.
+;;;###diary-autoload
 (defun diary-sabbath-candles (&optional mark)
   "Local time of candle lighting diary entry--applies if date is a Friday.
 No diary entry if there is no sunset on that date.
@@ -1015,6 +1018,7 @@ solstice.  These formulas are only to be used between 1000 BC and 3000 AD."
                             (* -0.00823 z z z)
                             (* 0.00032 z z z z)))))))
 
+;;;###holiday-autoload
 (defun solar-equinoxes-solstices ()
   "Local date and time of equinoxes and solstices, if visible in the calendar.
 Requires floating point."