bug#14405: 24.3.50; read-regexp-defaults-function

[Jambunathan K]

My workflow is M-s o searches for symbol at point.  Your recent commit
revno: 115651 closed this behaviour for me.  Just wanted to check
whether you overlooked the following diff.

The following works for me.

    (custom-set-variables
     '(read-regexp-defaults-function
       (quote find-tag-default-as-symbol-regexp)))

=== modified file 'lisp/replace.el'
--- lisp/replace.el     2013-12-20 19:55:56 +0000
+++ lisp/replace.el     2013-12-21 02:17:41 +0000
@@ -1239,7 +1239,7 @@ which means to discard all text properti
          (regexp (read-regexp (if perform-collect
                                   "Collect strings matching regexp"
                                 "List lines matching regexp")
-                              'regexp-history-last)))
+                              read-regexp-defaults-function)))
     (list regexp
          (if perform-collect
              ;; Perform collect operation