diff options
| -rw-r--r-- | lisp/term/mac-win.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el index b96417a04a1..207420f7261 100644 --- a/lisp/term/mac-win.el +++ b/lisp/term/mac-win.el | |||
| @@ -1772,6 +1772,9 @@ if possible. If there's no such frame, a new frame is created." | |||
| 1772 | ;; Reaches here if the user has canceled the quit. | 1772 | ;; Reaches here if the user has canceled the quit. |
| 1773 | (mac-resume-apple-event ae -128)))) ; userCanceledErr | 1773 | (mac-resume-apple-event ae -128)))) ; userCanceledErr |
| 1774 | 1774 | ||
| 1775 | ;; url-generic-parse-url is autoloaded from url-parse. | ||
| 1776 | ;;;(declare-function url-type "url-parse") ; defstruct | ||
| 1777 | |||
| 1775 | (defun mac-ae-get-url (event) | 1778 | (defun mac-ae-get-url (event) |
| 1776 | "Open the URL specified by the Apple event EVENT. | 1779 | "Open the URL specified by the Apple event EVENT. |
| 1777 | Currently the `mailto' scheme is supported." | 1780 | Currently the `mailto' scheme is supported." |