Просмотр исходного кода

org-mobile: Silence byte-compiler

Nicolas Goaziou 9 лет назад
Родитель
Сommit
1f76dd1fe1
1 измененных файлов с 3 добавлено и 5 удалено
  1. 3 5
      lisp/org-mobile.el

+ 3 - 5
lisp/org-mobile.el

@@ -308,11 +308,9 @@ Also exclude files matching `org-mobile-files-exclude-regexp'."
 This will create the index file, copy all agenda files there, and also
 This will create the index file, copy all agenda files there, and also
 create all custom agenda views, for upload to the mobile phone."
 create all custom agenda views, for upload to the mobile phone."
   (interactive)
   (interactive)
-  (let* ((agenda-base-name org-agenda-buffer-name)
-	 (agenda-this-name (or org-agenda-this-buffer-name agenda-base-name))
-	 (org-agenda-buffer-name "*SUMO*")
-	 (org-agenda-tag-filter org-agenda-tag-filter)
-	 (org-agenda-redo-command org-agenda-redo-command))
+  (let ((org-agenda-buffer-name "*SUMO*")
+	(org-agenda-tag-filter org-agenda-tag-filter)
+	(org-agenda-redo-command org-agenda-redo-command))
     (save-excursion
     (save-excursion
       (save-restriction
       (save-restriction
 	(save-window-excursion
 	(save-window-excursion