diff options
author | Glenn Morris <rgm@gnu.org> | 2012-05-07 18:53:17 -0400 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2012-05-07 18:53:17 -0400 |
commit | af8630f410df429ceece61d7ceee2110d0c366a2 (patch) | |
tree | 8c60c37d2627cddc9eb05d5b589f8919a028aee2 /lisp/forms-pass.el | |
parent | 57699e3735e756ef8d11eaa77f4246aa251ec6ca (diff) | |
download | emacs-af8630f410df429ceece61d7ceee2110d0c366a2.tar.gz |
Move some forms.el example files to etc/forms directory
* etc/forms/README: New.
* etc/forms/forms-d2.dat: Move to etc/forms/ subdirectory.
* etc/forms/forms-d2.el, etc/forms/forms-pass.el: Move here from ../lisp.
* lisp/forms.el: Related comment change.
Diffstat (limited to 'lisp/forms-pass.el')
-rw-r--r-- | lisp/forms-pass.el | 33 |
1 files changed, 0 insertions, 33 deletions
diff --git a/lisp/forms-pass.el b/lisp/forms-pass.el deleted file mode 100644 index b635c965cf0..00000000000 --- a/lisp/forms-pass.el +++ /dev/null @@ -1,33 +0,0 @@ -;;; forms-pass.el --- passwd file demo for forms-mode -*- no-byte-compile: t -*- - -;; This file is part of GNU Emacs. - -;;; Commentary: - -;; This demo visits your passwd file. - -;;; Code: - -;; 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")) - -;;; forms-pass.el ends here |