procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/subr.el (find-tag-default-as-regexp): Return nil if `tag' is nil.

Browse source 
Fixes: debbugs:14390
This commit is contained in:
Juri Linkov 2013-05-15 02:38:14 +03:00
parent 0ac0fecb15
commit 180ed21842
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2013-05-14 Juri Linkov <juri@jurta.org>
* subr.el (find-tag-default-as-regexp): Return nil if `tag' is nil.
(Bug#14390)
2013-05-14 Glenn Morris <rgm@gnu.org>
* progmodes/f90.el (f90-imenu-generic-expression):

2
lisp/subr.el
View file

@ -2738,7 +2738,7 @@ symbol at point exactly."
(get major-mode 'find-tag-default-function)
'find-tag-default))
(tag (funcall tagf)))
(cond ((not tag))
(cond ((null tag) nil)
((eq tagf 'find-tag-default)
(format "\\_<%s\\_>" (regexp-quote tag)))
(t (regexp-quote tag)))))