/[emacs]/emacs/lisp/isearch.el
ViewVC logotype

Diff of /emacs/lisp/isearch.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.212.2.13 by miles, Thu Sep 16 00:12:21 2004 UTC revision 1.212.2.14 by miles, Thu Sep 16 00:14:58 2004 UTC
# Line 146  Ordinarily the text becomes invisible ag Line 146  Ordinarily the text becomes invisible ag
146    :type 'boolean    :type 'boolean
147    :group 'isearch)    :group 'isearch)
148    
149  (defcustom isearch-resume-enabled t  (defcustom isearch-resume-in-command-history nil
150    "*If non-nil, `isearch-resume' commands are added to the command history."    "*If non-nil, `isearch-resume' commands are added to the command history.
151    This allows you to resume earlier isearch sessions through the
152    command history."
153    :type 'boolean    :type 'boolean
154    :group 'isearch)    :group 'isearch)
155    
# Line 651  is treated as a regexp.  See \\[isearch- Line 653  is treated as a regexp.  See \\[isearch-
653    (setq disable-point-adjustment t))    (setq disable-point-adjustment t))
654    
655  (defun isearch-done (&optional nopush edit)  (defun isearch-done (&optional nopush edit)
656    (if isearch-resume-enabled    (if isearch-resume-in-command-history
657        (let ((command `(isearch-resume ,isearch-string ,isearch-regexp        (let ((command `(isearch-resume ,isearch-string ,isearch-regexp
658                                        ,isearch-word ,isearch-forward                                        ,isearch-word ,isearch-forward
659                                        ,isearch-message                                        ,isearch-message

Legend:
Removed from v.1.212.2.13  
changed lines
  Added in v.1.212.2.14

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26