unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#3350: 23.0.93; Deactivation of region by the insert function
@ 2009-05-22 12:45 Lennart Borgman
       [not found] ` <jwvoctlrm4f.fsf-monnier+emacsbugreports@gnu.org>
  0 siblings, 1 reply; 4+ messages in thread
From: Lennart Borgman @ 2009-05-22 12:45 UTC (permalink / raw)
  To: emacs-pretest-bug

Start from

  emacs -Q

and enter this in the *scratch* buffer and eval it:

(defvar msgtrc-buffer
  "*Messages*"
  "Buffer or name of buffer for trace messages.
See `msgtrc'.")


(defun msgtrc (format-string &rest args)
  "Print message to `msgtrc-buffer'.
Arguments FORMAT-STRING and ARGS are like for `message'."
  (let ((trc-buffer (get-buffer-create msgtrc-buffer)))
    (with-current-buffer trc-buffer
      (goto-char (point-max))
      ;;(insert "MU:" (apply 'format format-string args) "\n")
      (insert "constant string\n")
      (when buffer-file-name (write-region nil nil buffer-file-name)))))

(defun msgtrc-post-command ()
  (msgtrc "msgtrc post-command here"))

(add-hook 'post-command-hook 'msgtrc-post-command nil t)


Then try activating the region with S-<arrow key>. This does not work.
However if the (insert ...) statement in msgtrc is commented out then
it works.

I have not tested if this is a regression from Emacs 22.


In GNU Emacs 23.0.93.1 (i386-mingw-nt5.1.2600)
 of 2009-05-03
Windowing system distributor `Microsoft Corp.', version 5.1.2600
configured using `configure --with-gcc (3.4) --no-opt --cflags
-Ic:/g/include -fno-crossjumping'






^ permalink raw reply	[flat|nested] 4+ messages in thread

end of thread, other threads:[~2009-05-25 13:42 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2009-05-22 12:45 bug#3350: 23.0.93; Deactivation of region by the insert function Lennart Borgman
     [not found] ` <jwvoctlrm4f.fsf-monnier+emacsbugreports@gnu.org>
     [not found]   ` <e01d8a50905221224s78f98843se1003798dad5554b@mail.gmail.com>
2009-05-25  2:06     ` Stefan Monnier
2009-05-25  2:20       ` Lennart Borgman
2009-05-25 13:42         ` Stefan Monnier

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).