From a2b84f35b3d89533a5429da46f7aa124efb1d18e Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Sun, 17 Feb 2008 16:57:44 +0000 Subject: [PATCH] * simple.el (transient-mark-mode): Add an :init-value. * startup.el (command-line): Use custom-reevaluate-setting for transient-mark-mode. * callint.c (syms_of_callint): Initialize Vmark_even_if_inactive with Qt. --- etc/NEWS | 2 ++ lisp/ChangeLog | 7 +++++++ lisp/simple.el | 4 +++- lisp/startup.el | 1 + src/ChangeLog | 5 +++++ src/callint.c | 2 +- 6 files changed, 19 insertions(+), 2 deletions(-) diff --git a/etc/NEWS b/etc/NEWS index c2501f3bc3d..5d724eac845 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -95,6 +95,8 @@ the currently selected Emacs frame. ** Emacs now supports the SVG image format through librsvg2. +** transient-mark-mode is now enabled by default. + ** If you set find-file-confirm-nonexistent-file to t, then C-x C-f requires confirmation before opening a non-existent file. diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 6256677c594..805570ea41a 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2008-02-17 Dan Nicolaescu + + * simple.el (transient-mark-mode): Add an :init-value. + + * startup.el (command-line): Use custom-reevaluate-setting for + transient-mark-mode. + 2008-02-17 Micha$(Q)a(Bl Cadilhac * wdired.el (wdired-allow-to-change-permissions): Fix typo. diff --git a/lisp/simple.el b/lisp/simple.el index e838731c1be..0ae64b550b7 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -3586,7 +3586,9 @@ default part of the buffer's text. Examples of such commands include Invoke \\[apropos-documentation] and type \"transient\" or \"mark.*active\" at the prompt, to see the documentation of commands which are sensitive to the Transient Mark mode." - :global t :group 'editing-basics) + :global t + :init-value (not noninteractive) + :group 'editing-basics) (defvar widen-automatically t "Non-nil means it is ok for commands to call `widen' when they want to. diff --git a/lisp/startup.el b/lisp/startup.el index 56101f3da28..27589295c44 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -847,6 +847,7 @@ opening the first frame (e.g. open a connection to an X server).") (custom-reevaluate-setting 'send-mail-function) (custom-reevaluate-setting 'focus-follows-mouse) (custom-reevaluate-setting 'global-auto-composition-mode) + (custom-reevaluate-setting 'transient-mark-mode) (normal-erase-is-backspace-setup-frame) diff --git a/src/ChangeLog b/src/ChangeLog index 333dd802676..25dd28a3ea5 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2008-02-17 Dan Nicolaescu + + * callint.c (syms_of_callint): Initialize Vmark_even_if_inactive + with Qt. + 2008-02-17 Kenichi Handa * ftfont.c (ftfont_shape): Return Lispy number. diff --git a/src/callint.c b/src/callint.c index 7dca5b30347..74e0e22fd6d 100644 --- a/src/callint.c +++ b/src/callint.c @@ -960,7 +960,7 @@ This option makes a difference in Transient Mark mode. When the option is non-nil, deactivation of the mark turns off region highlighting, but commands that use the mark behave as if the mark were still active. */); - Vmark_even_if_inactive = Qnil; + Vmark_even_if_inactive = Qt; DEFVAR_LISP ("mouse-leave-buffer-hook", &Vmouse_leave_buffer_hook, doc: /* Hook to run when about to switch windows with a mouse command. -- 2.39.5