Mercurial > emacs
changeset 16201:14f248aae1e0
(mouse-set-region):
Test for ms-windows instead of win32, and use memq.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 15 Sep 1996 02:17:49 +0000 |
| parents | a4588c1facee |
| children | 68eb8e1eeb13 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 1 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Sun Sep 15 02:16:57 1996 +0000 +++ b/lisp/mouse.el Sun Sep 15 02:17:49 1996 +0000 @@ -401,9 +401,7 @@ ;; If mark is highlighted, no need to bounce the cursor. ;; On X, we highlight while dragging, thus once again no need to bounce. (or transient-mark-mode - (eq (framep (selected-frame)) 'x) - (eq (framep (selected-frame)) 'pc) - (eq (framep (selected-frame)) 'win32) + (memq (framep (selected-frame)) '(x pc ms-windows)) (sit-for 1)) (push-mark) (set-mark (point))