diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-02-27 02:02:56 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2018-02-27 02:02:56 +0100 |
commit | 2c93a0b2d778143557f5bf913fefd3e1d07ac5db (patch) | |
tree | 85157963f973aac11f0f08c3ff8a9e0bc1004843 | |
parent | f521400a0892bc72ed4d161e11310a981a6abf24 (diff) | |
download | org-mode-2c93a0b2d778143557f5bf913fefd3e1d07ac5db.tar.gz |
org-tempo: Fix TAB behaviour
* lisp/org-tempo.el (org-tempo-complete-tag): Use a different trick to
handle failed completions.
Reported-by: Brent Goodrick <bgoodr@gmail.com>
<http://lists.gnu.org/r/emacs-orgmode/2018-02/msg00164.html>
-rw-r--r-- | lisp/org-tempo.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/org-tempo.el b/lisp/org-tempo.el index 9b8f8fa..d23754a 100644 --- a/lisp/org-tempo.el +++ b/lisp/org-tempo.el @@ -126,8 +126,9 @@ Goes through `org-structure-template-alist' and Unlike to `tempo-complete-tag', do not give a signal if a partial completion or no match at all is found. Return nil if expansion didn't succeed." - (cl-letf (((symbol-function 'ding) #'ignore)) - (tempo-complete-tag t))) + ;; `tempo-complete-tag' returns its SILENT argument when there is no + ;; completion available at all. + (not (eq 'fail (tempo-complete-tag 'fail)))) ;;; Additional keywords |