Mercurial > emacs
comparison lisp/mouse-sel.el @ 49839:4398c7a41151
(mouse-sel-determine-selection-thing): Fix character constant.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Tue, 18 Feb 2003 10:57:39 +0000 |
| parents | 72f4c4b10835 |
| children | 0be309c83b20 |
comparison
equal
deleted
inserted
replaced
| 49838:a5a1a55693ed | 49839:4398c7a41151 |
|---|---|
| 343 (cond | 343 (cond |
| 344 ((= nclicks 1) nil) | 344 ((= nclicks 1) nil) |
| 345 ((= nclicks 3) 'line) | 345 ((= nclicks 3) 'line) |
| 346 ((>= nclicks 4) 'paragraph) | 346 ((>= nclicks 4) 'paragraph) |
| 347 ((memq char-syntax '(?\( ?\) ?\" ?')) 'sexp) | 347 ((memq char-syntax '(?\( ?\) ?\" ?')) 'sexp) |
| 348 ((memq next-char '(? ?\t ?\n)) 'whitespace) | 348 ((memq next-char '(?\s ?\t ?\n)) 'whitespace) |
| 349 ((eq char-syntax ?_) 'symbol) | 349 ((eq char-syntax ?_) 'symbol) |
| 350 ((eq char-syntax ?w) 'word)))) | 350 ((eq char-syntax ?w) 'word)))) |
| 351 | 351 |
| 352 (defun mouse-sel-set-selection (selection value) | 352 (defun mouse-sel-set-selection (selection value) |
| 353 "Set the specified SELECTION to VALUE." | 353 "Set the specified SELECTION to VALUE." |