Commit af67c9d7 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

* progmodes/etags.el (tags-completion-at-point-function): Improve last fix.

parent 1acad97c
2012-03-21 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/etags.el (tags-completion-at-point-function):
Improve last fix.
* files.el (move-file-to-trash): Files aren't regexps (bug#11055).
2012-03-21 Sam Steingold <sds@gnu.org>
......
......@@ -809,10 +809,11 @@ If no tags table is loaded, do nothing and return nil."
beg)
(when pattern
(save-excursion
(when (search-backward pattern nil t) ; will fail inside pattern
(setq beg (point))
(forward-char (length pattern))
(list beg (point) (tags-lazy-completion-table) :exclusive 'no)))))))
(forward-char (1- (length pattern)))
(search-backward pattern)
(setq beg (point))
(forward-char (length pattern))
(list beg (point) (tags-lazy-completion-table) :exclusive 'no))))))
(defun find-tag-tag (string)
"Read a tag name, with defaulting and completion."
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment