Commit 6a72e405 authored by Stefan-W. Hahn's avatar Stefan-W. Hahn Committed by Stefan Monnier

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

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

Fixes: debbugs:16866
parent 722493d7
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):
......
......@@ -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)
......
......@@ -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.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment