Mercurial > emacs
annotate lisp/forms-pass.el @ 92986:589bafdc6c3e
Craig Markwardt <Craig.Markwardt at nasa.gov>
(icalendar-recurring-start-year): New variable.
(icalendar--diarytime-to-isotime): Fix treatment of 12:00pm - 12:59pm.
(icalendar-export-region): Ignore hidden diary entries.
(icalendar--convert-ordinary-to-ical): Fix case where event
spans across midnight boundary.
(icalendar-first-weekday-of-year): New function.
(icalendar--convert-weekly-to-ical): Allow user-selectable start
year for recurring events (Mozilla calendars do not propagate
recurring events forever, so year 2000 start date was not working).
(icalendar--convert-yearly-to-ical): Remove extra spaces in
formatting of BYMONTH and BYMONTHDAY (not allowed by ical spec).
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Sun, 16 Mar 2008 01:21:25 +0000 |
parents | 695cf19ef79e |
children | 375f2633d815 1e3a407766b9 |
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 |
52401 | 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 |