andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(epa--key-widget-action): Save the selected window to

Browse source 
make `widget-button-click-moves-point' work.  (Bug#733).
This commit is contained in:
Daiki Ueno 2008-08-26 03:11:45 +00:00
parent 69a8e9bb8a
commit a648af17d1
2 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2008-08-26 Daiki Ueno <ueno@unixuser.org>
* epa.el (epa--key-widget-action): Save the selected window to
make `widget-button-click-moves-point' work. (Bug#733).
2008-08-26 Glenn Morris <rgm@gnu.org>
* progmodes/gud.el (tramp-file-name-localname)

3
lisp/epa.el
View file

@ -269,7 +269,8 @@ You should bind this variable with `let', but do not set it globally.")
:help-echo 'epa--key-widget-help-echo)
(defun epa--key-widget-action (widget &optional event)
(epa--show-key (widget-get widget :value)))
(save-selected-window
(epa--show-key (widget-get widget :value))))
(defun epa--key-widget-value-create (widget)
(let* ((key (widget-get widget :value))