Преглед на файлове

org mobile - call pre hooks earlier

* lisp/org-mobile.el (org-mobile-push): Move call to hook, make it the
first thing of the push operation.
Bastien Guerry преди 14 години
родител
ревизия
1bc0623be2
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      lisp/org-mobile.el

+ 1 - 1
lisp/org-mobile.el

@@ -305,9 +305,9 @@ create all custom agenda views, for upload to the mobile phone."
 	  (org-agenda-redo-command org-agenda-redo-command))
       (save-excursion
 	(save-window-excursion
+	  (run-hooks 'org-mobile-pre-push-hook)
 	  (org-mobile-check-setup)
 	  (org-mobile-prepare-file-lists)
-	  (run-hooks 'org-mobile-pre-push-hook)
 	  (message "Creating agendas...")
 	  (let ((inhibit-redisplay t)) (org-mobile-create-sumo-agenda))
 	  (message "Creating agendas...done")