فهرست منبع

Remove double let-bindings.

Carsten Dominik 16 سال پیش
والد
کامیت
37d2872508
2فایلهای تغییر یافته به همراه4 افزوده شده و 3 حذف شده
  1. 3 0
      lisp/ChangeLog
  2. 1 3
      lisp/org-agenda.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2008-12-05  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-agenda.el (org-agenda-goto-calendar): Remove duplicate let
+	bindings of calendar variables.
+
 	* org-table.el (org-table-find-row-type): Renamed from
 	`org-find-row-type'.
 	(org-table-rewrite-old-row-references): Renamed from

+ 1 - 3
lisp/org-agenda.el

@@ -2982,7 +2982,7 @@ MATCH is being ignored."
   "Get the (Emacs Calendar) diary entries for DATE."
   (require 'diary-lib)
   (let* ((diary-fancy-buffer "*temporary-fancy-diary-buffer*")
-         (fancy-diary-buffer diary-fancy-buffer)
+	 (fancy-diary-buffer diary-fancy-buffer)
 	 (diary-display-hook '(fancy-diary-display))
 	 (diary-display-function 'fancy-diary-display)
 	 (pop-up-frames nil)
@@ -5550,8 +5550,6 @@ argument, latitude and longitude will be prompted for."
 	 (calendar-view-holidays-initially-flag nil)
 	 (calendar-view-diary-initially-flag nil)
 	 (view-calendar-holidays-initially nil)
-	 (calendar-view-diary-initially-flag nil)
-	 (calendar-view-holidays-initially-flag nil)
 	 (view-diary-entries-initially nil))
     (calendar)
     (calendar-goto-date date)))