comparison lisp/replace.el @ 3852:e365900ca7e7

* replace.el (query-replace-map): Make return exit query-replace, just like escape.
author Jim Blandy <jimb@redhat.com>
date Mon, 21 Jun 1993 00:45:17 +0000
parents a45459a8ce97
children d89645572b0f
comparison
equal deleted inserted replaced
3851:dbdcbcbe910a 3852:e365900ca7e7
393 (define-key query-replace-map "n" 'skip) 393 (define-key query-replace-map "n" 'skip)
394 (define-key query-replace-map "," 'act-and-show) 394 (define-key query-replace-map "," 'act-and-show)
395 (define-key query-replace-map "\e" 'exit) 395 (define-key query-replace-map "\e" 'exit)
396 (define-key query-replace-map [escape] 'exit) 396 (define-key query-replace-map [escape] 'exit)
397 (define-key query-replace-map "q" 'exit) 397 (define-key query-replace-map "q" 'exit)
398 (define-key query-replace-map "\r" 'exit)
399 (define-key query-replace-map "[return]" 'exit)
398 (define-key query-replace-map "." 'act-and-exit) 400 (define-key query-replace-map "." 'act-and-exit)
399 (define-key query-replace-map "\C-r" 'edit) 401 (define-key query-replace-map "\C-r" 'edit)
400 (define-key query-replace-map "\C-w" 'delete-and-edit) 402 (define-key query-replace-map "\C-w" 'delete-and-edit)
401 (define-key query-replace-map "\C-l" 'recenter) 403 (define-key query-replace-map "\C-l" 'recenter)
402 (define-key query-replace-map "!" 'automatic) 404 (define-key query-replace-map "!" 'automatic)