Bläddra i källkod

org-choose: Make XEmacs compatible

Carsten Dominik 16 år sedan
förälder
incheckning
23551eee32
2 ändrade filer med 8 tillägg och 4 borttagningar
  1. 5 0
      contrib/ChangeLog
  2. 3 4
      contrib/lisp/org-choose.el

+ 5 - 0
contrib/ChangeLog

@@ -1,3 +1,8 @@
+2009-02-12  Carsten Dominik  <carsten.dominik@gmail.com>
+
+	* lisp/org-choose.el ("org"): Use file name instead of feature for
+	`eval-after-load', this is XEmacs compatible.
+
 2009-02-10  Carsten Dominik  <carsten.dominik@gmail.com>
 
 	* lisp/org-choose.el (org-choose-get-fn-map-group): Call

+ 3 - 4
contrib/lisp/org-choose.el

@@ -499,12 +499,12 @@ NEW-MARK and OLD-MARK are the text of the new and old marks."
 
 ;;;_ , Setting it all up
 
-(eval-after-load 'org
+(eval-after-load "org"
   '(progn
      (add-to-list 'org-todo-setup-filter-hook
-		  #'org-choose-setup-filter) 
+		  #'org-choose-setup-filter)
      (add-to-list 'org-todo-get-default-hook
-		  #'org-choose-get-default-mark) 
+		  #'org-choose-get-default-mark)
      (add-to-list 'org-trigger-hook
 		  #'org-choose-keep-sensible)
      (add-to-list 'org-todo-interpretation-widgets
@@ -513,7 +513,6 @@ NEW-MARK and OLD-MARK are the text of the new and old marks."
      ))
 
 
-
 ;;;_. Footers
 ;;;_ , Provides