Fix previous change.

diff --git a/lisp/org/ChangeLog b/lisp/org/ChangeLog
index 95601912fe537e2c842e9e469d02d42de8f4429a..72b3870491b3fd14df3f43f3cbddcacadf173cc3 100644 (file)
--- 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'.

diff --git a/lisp/org/org-mac-message.el b/lisp/org/org-mac-message.el
index 41a8ff23ec47aeb860111197f92be1af64e6b46a..1ee0b57f6a64e309b9bbef4ede1287d0366f42d3 100644 (file)
--- 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)