(do-applescript): Fix declaration.

46a44648 · Glenn Morris · 00eade1a · 46a44648
Commit 46a44648 authored Aug 11, 2008 by Glenn Morris
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/org/org-mac-message.el lisp/org/org-mac-message.el +2 -1

No files found.
--- a/lisp/org/org-mac-message.el
+++ b/lisp/org/org-mac-message.el
@@ -32,7 +32,8 @@

 (org-add-link-type "message" 'org-mac-message-open)

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