Fix previous change.

2008-08-11 01:19:29 +00:00
parent 46a44648c6
commit 79e43d6eca
2 changed files with 5 additions and 1 deletions
--- a/lisp/org/ChangeLog
+++ b/lisp/org/ChangeLog
@@ -1,3 +1,7 @@
+2008-08-11  Glenn Morris  <rgm@gnu.org>
+
+	* org-mac-message.el (do-applescript): Fix declaration.
+
 2008-08-10  Glenn Morris  <rgm@gnu.org>

 	* org-exp.el (org-export-as-html): Let-bind `i'.
--- a/lisp/org/org-mac-message.el
+++ b/lisp/org/org-mac-message.el
@@ -33,7 +33,7 @@
 (org-add-link-type "message" 'org-mac-message-open)

 ;; In mac.c, removed in Emacs 23.
-(declare-function do-applescript "org-mac-message" (string))
+(declare-function do-applescript "org-mac-message" (script))
 (unless (fboundp 'do-applescript)
  ;; Need to fake this using shell-command-to-string
  (defun do-applescript (script)