comparison lisp/term/x-win.el @ 3068:32c1cb0149b3

* x-win.el (x-select-text): New arg PUSH. (x-switch-definitions): Represent -r as `reverse' option.
author Jim Blandy <jimb@redhat.com>
date Tue, 25 May 1993 10:23:48 +0000
parents 98f500ca5593
children 08003ba2ac71
comparison
equal deleted inserted replaced
3067:38fa0e3705f6 3068:32c1cb0149b3
102 command-switch-alist)) 102 command-switch-alist))
103 103
104 (defconst x-switch-definitions 104 (defconst x-switch-definitions
105 '(("-name" name) 105 '(("-name" name)
106 ("-T" name) 106 ("-T" name)
107 ("-r" lose) 107 ("-r" reverse t)
108 ("-rv" lose) 108 ("-rv" reverse t)
109 ("-reverse" lose) 109 ("-reverse" reverse t)
110 ("-fn" font) 110 ("-fn" font)
111 ("-font" font) 111 ("-font" font)
112 ("-ib" internal-border-width) 112 ("-ib" internal-border-width)
113 ("-fg" foreground-color) 113 ("-fg" foreground-color)
114 ("-foreground" foreground-color) 114 ("-foreground" foreground-color)