Mercurial > emacs

view lisp/forms-pass.el @ 36143:44a6f7ea121f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Major rewrite of Uniquify node and Iswitchb node. Reorder info about indirect buffers, and clarify. Put BS and MSB together in one node, Buffer Menus. Don't mention kill-read-only-ok here. Misc. clarifications.
author Richard M. Stallman <rms@gnu.org>
date Sat, 17 Feb 2001 13:51:18 +0000
parents 84acc3adcd63
children 67b464da13ec
line wrap: on
line source

;;; forms-pass.el --- passwd file demo for forms-mode

;; 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"))