mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

entered into RCS

Browse source
This commit is contained in:
Richard M. Stallman 1991-07-01 18:05:53 +00:00
parent 35692fe0de
commit 5dd353d2d7
1 changed files with 9 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

14
lisp/forms-pass.el
View file

@ -1,15 +1,19 @@
;; demo for forms-mode
;; demo for forms-mode -*-emacs-lisp-*-
;;
;; This demo visits /etc/passwd.
;; 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-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
'("====== Visiting /etc/passwd ======\n\n"
(list
"====== Visiting " forms-file " ======\n\n"
"User : " 1
"Password : " 2
" Uid: " 3
" Gid: " 4
"\n\n"