* lisp/term/xterm.el (xterm-paste): Use large finite timeout when
reading event to avoid putting keys in this-command-keys.
+2014-04-27 Daniel Colascione <dancol@dancol.org>
+
+ * term/xterm.el (xterm-paste): Use large finite timeout when
+ reading event to avoid putting keys in this-command-keys.
+
2014-04-25 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/perl-mode.el (perl--syntax-exp-intro-regexp): New var.
(while (not (search-backward
xterm-paste-ending-sequence
(- (point) end-marker-length) t))
- (let ((event (read-event)))
+ (let ((event (read-event
+ nil nil
+ ;; Use finite timeout to avoid
+ ;; glomming the event onto
+ ;; this-command-keys.
+ most-positive-fixnum)))
(when (eql event ?\r)
(setf event ?\n))
(insert event)))