[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind] |
Date: |
Tue, 06 Jul 2004 06:26:51 -0400 |
Index: emacs/src/keyboard.c
diff -c emacs/src/keyboard.c:1.681.2.13 emacs/src/keyboard.c:1.681.2.14
*** emacs/src/keyboard.c:1.681.2.13 Tue Jul 6 10:14:28 2004
--- emacs/src/keyboard.c Tue Jul 6 10:17:20 2004
***************
*** 681,686 ****
--- 681,688 ----
to support it. */
static int cannot_suspend;
+ extern Lisp_Object Qidentity, Qonly;
+
/* Install the string STR as the beginning of the string of echoing,
so that it serves as a prompt for the next character.
Also start echoing. */
***************
*** 1822,1827 ****
--- 1824,1839 ----
call1 (Vrun_hooks, intern ("activate-mark-hook"));
}
+ /* Setting transient-mark-mode to `only' is a way of
+ turning it on for just one command. */
+ if (!NILP (current_buffer->mark_active) && !NILP (Vrun_hooks))
+ {
+ if (EQ (Vtransient_mark_mode, Qidentity))
+ Vtransient_mark_mode = Qnil;
+ if (EQ (Vtransient_mark_mode, Qonly))
+ Vtransient_mark_mode = Qidentity;
+ }
+
finalize:
if (current_buffer == prev_buffer
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind],
Miles Bader <=
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind], Miles Bader, 2004/07/06
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind], Miles Bader, 2004/07/06
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind], Miles Bader, 2004/07/06
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind], Miles Bader, 2004/07/06
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind], Miles Bader, 2004/07/06
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind], Miles Bader, 2004/07/08
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind], Miles Bader, 2004/07/16
- [Emacs-diffs] Changes to emacs/src/keyboard.c [lexbind], Miles Bader, 2004/07/23