Mercurial > emacs
view lisp/forms-pass.el @ 4132:e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
which might occur during startup.
* term/x-win.el: Make the `-rn NAME' option specify a resource
name, as documented, and not a resource database string. Make
`-name NAME' act like `-rn NAME' and also set the name of the
initial frame.
(command-switch-alist): Process the `-rn' and `-name' options
using the x-handle-name-rn-switch function.
(x-handle-name-rn-switch): New function, which sets the
x-resource-name variable.
(opening connection): Make sure x-resource-name is valid. If it's
not a string, set it to (invocation-name), with any periods or
asterisks changed to hyphens.
* term/x-win.el: Make the `-xrm STRING' option specify a resource
database string. `-rn' used to behave this way.
(command-switch-alist): Process the `-xrm' switch using
x-handle-xrm-switch.
(x-handle-xrm-switch): Renamed from x-handle-rn-switch; this
function does the right thing for `-xrm', not for `-rn'.
* term/x-win.el: Recognize affirmative values for reverseVideo
properly. Include "on" in the list of recognized values.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Sun, 18 Jul 1993 06:21:42 +0000 |
parents | 785babb5bb6f |
children | 84acc3adcd63 |
line wrap: on
line source
;; demo for forms-mode -*-emacs-lisp-*- ;; ;; This demo visits your passwd file. ;; use yp if present (or (file-exists-p (setq forms-file "/var/yp/src/passwd")) (setq forms-file "/etc/passwd")) (setq forms-read-only t) ; to make sure (setq forms-field-sep ":") (setq forms-number-of-fields 7) (setq forms-format-list (list "====== Visiting " forms-file " ======\n\n" "User : " 1 " Uid: " 3 " Gid: " 4 "\n\n" "Name : " 5 "\n\n" "Home : " 6 "\n\n" "Shell: " 7 "\n"))