Fix compatibility issues with org-choose.el

Patch by Tom Breton.
This commit is contained in:
Carsten Dominik 2009-02-13 22:36:01 +01:00
parent 9524d5ea96
commit 29ff144600
2 changed files with 7 additions and 3 deletions

View File

@ -2,6 +2,9 @@
* lisp/org-choose.el (org-choose-get-fn-map-group): Require
`org-agenda'.
(cl): Require `cl' at runtime.
(org-choose-filter-one): Use `org-split-string' for consistency
accross Emacs version.
2009-02-12 Carsten Dominik <carsten.dominik@gmail.com>

View File

@ -63,8 +63,9 @@
;;;_ , Requires
(require 'org)
(eval-when-compile
(require 'cl))
;(eval-when-compile
; (require 'cl))
(require 'cl)
;;;_. Body
;;;_ , The variables
@ -109,7 +110,7 @@ Each entry is an `org-choose-mark-data.'" )
;;Split it
(arglist
(let
((arglist-x (split-string args ",")))
((arglist-x (org-split-string args ",")))
;;When string starts with "," `split-string' doesn't
;;make a first arg, so in that case make one
;;manually.