Initial revision

1 files changed, 20 insertions, 0 deletions

diff --git a/lisp/forms-pass.el b/lisp/forms-pass.el
new file mode 100644
index 00000000000..d9628a37742
--- /dev/null
+++ b/lisp/forms-pass.el
@@ -0,0 +1,20 @@
+;; demo for forms-mode
+;;
+;; This demo visits /etc/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
+     '("====== Visiting /etc/passwd ======\n\n"
+       "User : "        1
+       "   Uid: "       3
+       "   Gid: "       4
+       "\n\n"
+       "Name : "        5
+       "\n\n"
+       "Home : "        6
+       "\n\n"
+       "Shell: "        7
+       "\n"))