Hello, why not use last value from `grep-regexp-history' if `grep-tag-default' is unable to find default tag?
I know user can do it by customizing `find-tag-default-function', but why not make it the default behaivour? That is quite convenient
So `grep-tag-default' will look like:
(defun grep-tag-default ()
(or (and transient-mark-mode mark-active
(/= (point) (mark))
(buffer-substring-no-properties (point) (mark)))
(funcall (or find-tag-default-function
(get major-mode 'find-tag-default-function)
'find-tag-default))
(car grep-regexp-history)
""))
thanks