Mercurial > emacs
annotate lisp/forms-pass.el @ 100354:89bba37a3188
* progmodes/ruby-mode.el (ruby-mode-abbrev-table, ruby-mode-map)
(ruby-mode-syntax-table, ruby-indent-tabs-mode, ruby-indent-level)
(ruby-mode-variables, ruby-indent-line, ruby-indent-size)
(ruby-calculate-indent, ruby-electric-brace, ruby-beginning-of-defun)
(ruby-here-doc-beg-syntax, ruby-here-doc-end-syntax)
(ruby-font-lock-syntax-table, ruby-font-lock-keywords)
(ruby-end-of-defun, ruby-move-to-block, ruby-forward-sexp)
(ruby-backward-sexp, ruby-add-log-current-method)
(ruby-font-lock-syntactic-keywords, ruby-comment-beg-syntax)
(ruby-in-here-doc-p, ruby-mode): Fix typos in docstrings.
(ruby-deep-indent-paren): Doc fix.
(ruby-insert-encoding-magic-comment): Remove * from docstring.
(ruby-here-doc-find-end): Reflow docstring.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Thu, 11 Dec 2008 11:03:42 +0000 |
parents | 1e3a407766b9 |
children | ef719132ddfa |
rev | line source |
---|---|
47726
33d53d287ee4
Add "no-byte-compile: t" in first line.
Juanma Barranquero <lekktu@gmail.com>
parents:
38414
diff
changeset
|
1 ;;; forms-pass.el --- passwd file demo for forms-mode -*- no-byte-compile: t -*- |
13337 | 2 |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
13337
diff
changeset
|
3 ;; This file is part of GNU Emacs. |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
13337
diff
changeset
|
4 |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
13337
diff
changeset
|
5 ;;; Commentary: |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
13337
diff
changeset
|
6 |
306 | 7 ;; This demo visits your passwd file. |
275 | 8 |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
13337
diff
changeset
|
9 ;;; Code: |
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
13337
diff
changeset
|
10 |
306 | 11 ;; use yp if present |
12 (or (file-exists-p (setq forms-file "/var/yp/src/passwd")) | |
13 (setq forms-file "/etc/passwd")) | |
14 | |
275 | 15 (setq forms-read-only t) ; to make sure |
16 (setq forms-field-sep ":") | |
17 (setq forms-number-of-fields 7) | |
306 | 18 |
275 | 19 (setq forms-format-list |
306 | 20 (list |
21 "====== Visiting " forms-file " ======\n\n" | |
275 | 22 "User : " 1 |
23 " Uid: " 3 | |
24 " Gid: " 4 | |
25 "\n\n" | |
26 "Name : " 5 | |
27 "\n\n" | |
28 "Home : " 6 | |
29 "\n\n" | |
30 "Shell: " 7 | |
31 "\n")) | |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
13337
diff
changeset
|
32 |
93975
1e3a407766b9
Fix up comment convention on the arch-tag lines.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
52401
diff
changeset
|
33 ;; arch-tag: 74801012-1a2d-4173-b9e4-fcfa241e2305 |
38414
67b464da13ec
Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents:
13337
diff
changeset
|
34 ;;; forms-pass.el ends here |