Mercurial > hg > xemacs-beta

comparison lisp/replace.el @ 456:e7ef97881643 r21-2-43

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-43
author cvs
date Mon, 13 Aug 2007 11:41:24 +0200
parents 3078fd1074e8
children 13daf40fb997
comparison
equal deleted inserted replaced
455:5b97c1cd6ed0 456:e7ef97881643
414 (input 414 (input
415 (if default 415 (if default
416 ;; rewritten for I18N3 snarfing 416 ;; rewritten for I18N3 snarfing
417 (read-from-minibuffer 417 (read-from-minibuffer
418 (format "List lines matching regexp (default `%s'): " 418 (format "List lines matching regexp (default `%s'): "
419 default) nil nil nil 'regexp-history) 419 default) nil nil nil 'regexp-history nil
420 default)
420 (read-from-minibuffer 421 (read-from-minibuffer
421 "List lines matching regexp: " 422 "List lines matching regexp: "
422 nil nil nil 423 nil nil nil
423 'regexp-history)))) 424 'regexp-history))))
424 (if (and (equal input "") default) 425 (if (and (equal input "") default)