Mercurial > hg > xemacs-beta

comparison src/event-stream.c @ 5384:3889ef128488

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix misspelled words, and some grammar, across the entire source tree. See xemacs-patches message with ID <AANLkTi=edkEKtK3pZ60ytsG5pTJQy2TjAEVCZCLOa-oA@mail.gmail.com>.
author Jerry James <james@xemacs.org>
date Thu, 24 Mar 2011 11:00:11 -0600
parents 6f10ac29bf40
children 4dee0387b9de
comparison
equal deleted inserted replaced
5383:294ab9180fad 5384:3889ef128488
5375 5375
5376 ;(setq x (list (read-char) quit-flag))^J^G 5376 ;(setq x (list (read-char) quit-flag))^J^G
5377 ;(let ((inhibit-quit t)) (setq x (list (read-char) quit-flag)))^J^G 5377 ;(let ((inhibit-quit t)) (setq x (list (read-char) quit-flag)))^J^G
5378 ;for BOTH, x should get set to (7 t), but no result should be printed. 5378 ;for BOTH, x should get set to (7 t), but no result should be printed.
5379 ;; #### According to the doc of quit-flag, second test should return 5379 ;; #### According to the doc of quit-flag, second test should return
5380 ;; (?\^G nil). Accidentaly XEmacs returns correct value. However, 5380 ;; (?\^G nil). XEmacs accidentally returns the correct value. However,
5381 ;; XEmacs 21.1.12 and 21.2.36 both fails on first test. 5381 ;; XEmacs 21.1.12 and 21.2.36 both fail on the first test.
5382 5382
5383 ;also do this: make two frames, one viewing "*scratch*", the other "foo". 5383 ;also do this: make two frames, one viewing "*scratch*", the other "foo".
5384 ;in *scratch*, type (sit-for 20)^J 5384 ;in *scratch*, type (sit-for 20)^J
5385 ;wait a couple of seconds, move cursor to foo, type "a" 5385 ;wait a couple of seconds, move cursor to foo, type "a"
5386 ;a should be inserted in foo. Cursor highlighting should not change in 5386 ;a should be inserted in foo. Cursor highlighting should not change in