diff options
| author | Takaaki ISHIKAWA <takaxp@ieee.org> | 2019-12-09 13:08:56 +0900 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2019-12-09 05:33:00 -0500 |
| commit | c7ad3f88454290ac072753f4158221db7323f2fe (patch) | |
| tree | cf57175d537b28678f8d5443bde734e991780fe8 | |
| parent | eab7c4e581a08ec42eb0b679266add4a5da45877 (diff) | |
| download | org-mode-c7ad3f88454290ac072753f4158221db7323f2fe.tar.gz | |
ox.el: Replace error with user-error to exit org-export-dispatch
* lisp/ox.el (org-export--dispatch-action): Replace error with
user-error a user-error so that user can quit `org-export-dispatch'
without entering debugging mode.
Modified from a patch proposal by Takaaki Ishikawa.
<https://lists.gnu.org/archive/html/emacs-orgmode/2019-12/msg00071.html>
| -rw-r--r-- | lisp/ox.el | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -6929,7 +6929,7 @@ options as CDR." (org-export--dispatch-ui options first-key expertp)) ;; q key at first level aborts export. At second level, cancel ;; first key instead. - ((eq key ?q) (if (not first-key) (error "Export aborted") + ((eq key ?q) (if (not first-key) (user-error "Export aborted") (org-export--dispatch-ui options nil expertp))) ;; Help key: Switch back to standard interface if expert UI was ;; active. |