[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Search]

patch: enable transient mark mode



I found this issue already reported in 2009:
https://www.emacspeak.org/VCCS-archive/2009/msg00000.html

It is very difficult for me to live without transient mark mode. This patch seems to fix the problem.

Before this patch some commands (for example dtk-speak) caused deactivation of the mark. Even right after setting the mark with C-SPC and checking by evaluation of mark-active, the result was nil. Now I see transient-mark-mode works in simple cases. If one finds a case where it still has problems, please report.

Jarek

Index: lisp/dtk-speak.el
===================================================================
--- lisp/dtk-speak.el	(revision 8421)
+++ lisp/dtk-speak.el	(working copy)
@@ -1833,6 +1833,7 @@
              (setq text (substring  text 0 ctrl-m ))
              (emacspeak-auditory-icon 'ellipses))))
     (let ((inhibit-point-motion-hooks t)
+          (deactivate-mark nil)
           (invisibility-spec buffer-invisibility-spec)
           (syntax-table (syntax-table ))
           (inherit-speaker-process dtk-speaker-process)
Index: lisp/emacspeak-speak.el
===================================================================
--- lisp/emacspeak-speak.el	(revision 8421)
+++ lisp/emacspeak-speak.el	(working copy)
@@ -177,6 +177,7 @@
            (inhibit-modification-hooks nil)
            (save-inhibit-point-motion-hooks inhibit-point-motion-hooks)
            (inhibit-point-motion-hooks t)
+           (deactivate-mark nil)
            (modification-flag (buffer-modified-p)))
        (unwind-protect
            (progn


If you have questions about this archive or had problems using it, please send mail to:

priestdo@xxxxxxxxxxx No Soliciting!

Emacspeak List Archive | 2010 | 2009 | 2008 | 2007 | 2006 | 2005 | 2004 | 2003 | 2002 | 2001 | 2000 | 1999 | 1998 | Pre 1998

Emacspeak Files | Emacspeak Blog