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.

1 files changed, 33 insertions, 0 deletions

diff --git a/etc/forms/forms-pass.el b/etc/forms/forms-pass.el
new file mode 100644
index 00000000000..34d4548434b
--- /dev/null
+++ b/etc/forms/forms-pass.el
@@ -0,0 +1,33 @@
+;;; forms-pass.el --- passwd file demo for forms-mode
+
+;; 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