diff options
| author | Glenn Morris | 2012-10-06 09:59:01 -0700 |
|---|---|---|
| committer | Glenn Morris | 2012-10-06 09:59:01 -0700 |
| commit | 50d92e32c2770a98fed777e3a676fca1205d28ae (patch) | |
| tree | 6c0145b92e683c56eb1f3ac39354fbed6fd347d5 | |
| parent | 0db901c17a90b38c81b4b03e0c83c61e814a6c0b (diff) | |
| download | emacs-50d92e32c2770a98fed777e3a676fca1205d28ae.tar.gz emacs-50d92e32c2770a98fed777e3a676fca1205d28ae.zip | |
Fix previous read-passwd change
| -rw-r--r-- | lisp/subr.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/subr.el b/lisp/subr.el index 72bedc69c3c..e8eef541f27 100644 --- a/lisp/subr.el +++ b/lisp/subr.el | |||
| @@ -2183,8 +2183,9 @@ by doing (clear-string STRING)." | |||
| 2183 | (add-hook 'after-change-functions hide-chars-fun nil 'local)) | 2183 | (add-hook 'after-change-functions hide-chars-fun nil 'local)) |
| 2184 | (unwind-protect | 2184 | (unwind-protect |
| 2185 | (let ((enable-recursive-minibuffers t) | 2185 | (let ((enable-recursive-minibuffers t) |
| 2186 | (map minibuffer-local-map) | 2186 | (map (make-sparse-keymap)) |
| 2187 | result) | 2187 | result) |
| 2188 | (set-keymap-parent map minibuffer-local-map) | ||
| 2188 | (define-key map "\C-u" ; bug#12570 | 2189 | (define-key map "\C-u" ; bug#12570 |
| 2189 | (lambda () (interactive) (delete-minibuffer-contents))) | 2190 | (lambda () (interactive) (delete-minibuffer-contents))) |
| 2190 | (setq result | 2191 | (setq result |