Small fix

* lisp/org.el (org-set-tags-command): Also avoid using `looking-back',
in particular without a LIMIT argument.  This silences the
byte-compiler.
This commit is contained in:
Nicolas Goaziou 2020-02-23 10:30:22 +01:00
parent d9d877491b
commit 83518daf11
1 changed files with 4 additions and 2 deletions

View File

@ -11664,8 +11664,10 @@ in Lisp code use `org-set-tags' instead."
nil nil (org-make-tag-string current-tags)
'org-tags-history)))))))
(org-set-tags tags)))))
;; `save-excursion' may not replace the point at the right position:
(when (looking-back "^\*+") (forward-char))))
;; `save-excursion' may not replace the point at the right
;; position.
(when (save-excursion (skip-chars-backward "*") (bolp))
(forward-char))))
(defun org-align-tags (&optional all)
"Align tags in current entry.