Mercurial > emacs
annotate lisp/forms-pass.el @ 275:9b41e1ed5e68
Initial revision
author | Brian Preble <rassilon@gnu.org> |
---|---|
date | Mon, 20 May 1991 19:05:21 +0000 |
parents | |
children | 753aa880c523 |
rev | line source |
---|---|
275 | 1 ;; demo for forms-mode |
2 ;; | |
3 ;; This demo visits /etc/passwd. | |
4 | |
5 (setq forms-file "/etc/passwd") | |
6 (setq forms-read-only t) ; to make sure | |
7 (setq forms-field-sep ":") | |
8 (setq forms-number-of-fields 7) | |
9 (setq forms-format-list | |
10 '("====== Visiting /etc/passwd ======\n\n" | |
11 "User : " 1 | |
12 " Uid: " 3 | |
13 " Gid: " 4 | |
14 "\n\n" | |
15 "Name : " 5 | |
16 "\n\n" | |
17 "Home : " 6 | |
18 "\n\n" | |
19 "Shell: " 7 | |
20 "\n")) |