Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-16 17:24:23 +00:00
Code Issues Projects Releases Packages Wiki Activity

* lisp/ps-print.el (ps-generate-postscript-with-faces):

Browse source 
Explicitly deactivate the mark.
* lisp/simple.el (deactivate-mark): Update region highlight.

Fixes: debbugs:16866
This commit is contained in:
Stefan-W. Hahn 2014-03-19 15:12:50 -04:00 committed by Stefan Monnier
parent 722493d794
commit 6a72e40553
3 changed files with 9 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/ChangeLog
View file

@ -1,3 +1,9 @@
2014-03-19 Stefan-W. Hahn <stefan.hahn@s-hahn.de>
* ps-print.el (ps-generate-postscript-with-faces):
Explicitly deactivate the mark (bug#16866).
* simple.el (deactivate-mark): Update region highlight.
2014-03-19 Juanma Barranquero <lekktu@gmail.com>
* emacs-lisp/package.el (describe-package-1):

1
lisp/ps-print.el
View file

@ -6429,6 +6429,7 @@ If FACE is not a valid face name, use default face."
(save-restriction
(narrow-to-region from to)
(ps-print-ensure-fontified from to)
(deactivate-mark) ;bug#16866.
(ps-generate-postscript-with-faces1 from to)))
(defun ps-generate-postscript (from to)

3
lisp/simple.el
View file

@ -4386,7 +4386,8 @@ run `deactivate-mark-hook'."
(if (eq (car-safe transient-mark-mode) 'only)
(setq transient-mark-mode (cdr transient-mark-mode)))
(setq mark-active nil)
(run-hooks 'deactivate-mark-hook))))
(run-hooks 'deactivate-mark-hook))
(redisplay--update-region-highlight (selected-window))))
(defun activate-mark (&optional no-tmm)
"Activate the mark.