mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-12-13 09:32:19 +00:00
Code

Fix compatibility issues with org-choose.el

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
contrib/ChangeLog
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>

7
contrib/lisp/org-choose.el
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.