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