aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2008-03-07 04:20:41 +0000
committerGlenn Morris2008-03-07 04:20:41 +0000
commit100a41414a596397b98f4e03b6809a02c0bd17f9 (patch)
tree16ec50e14edf7f40120156adbb37471ef668b2ad
parent719b64c2d9cb294a8ff465cb5ba39d9b41f2e0b9 (diff)
downloademacs-100a41414a596397b98f4e03b6809a02c0bd17f9.tar.gz
emacs-100a41414a596397b98f4e03b6809a02c0bd17f9.zip
(org-agenda-sunrise-sunset): Require solar.
(calendar-longitude, calendar-latitude, calendar-location-name): Declare for compiler.
-rw-r--r--lisp/textmodes/org.el5
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/textmodes/org.el b/lisp/textmodes/org.el
index 912411453ed..71d8dee75f3 100644
--- a/lisp/textmodes/org.el
+++ b/lisp/textmodes/org.el
@@ -22728,12 +22728,17 @@ the cursor position."
22728 (interactive) 22728 (interactive)
22729 (org-agenda-execute-calendar-command 'list-calendar-holidays)) 22729 (org-agenda-execute-calendar-command 'list-calendar-holidays))
22730 22730
22731(defvar calendar-longitude)
22732(defvar calendar-latitude)
22733(defvar calendar-location-name)
22734
22731(defun org-agenda-sunrise-sunset (arg) 22735(defun org-agenda-sunrise-sunset (arg)
22732 "Display sunrise and sunset for the cursor date. 22736 "Display sunrise and sunset for the cursor date.
22733Latitude and longitude can be specified with the variables 22737Latitude and longitude can be specified with the variables
22734`calendar-latitude' and `calendar-longitude'. When called with prefix 22738`calendar-latitude' and `calendar-longitude'. When called with prefix
22735argument, latitude and longitude will be prompted for." 22739argument, latitude and longitude will be prompted for."
22736 (interactive "P") 22740 (interactive "P")
22741 (require 'solar)
22737 (let ((calendar-longitude (if arg nil calendar-longitude)) 22742 (let ((calendar-longitude (if arg nil calendar-longitude))
22738 (calendar-latitude (if arg nil calendar-latitude)) 22743 (calendar-latitude (if arg nil calendar-latitude))
22739 (calendar-location-name 22744 (calendar-location-name