Mercurial > hg > xemacs-beta
comparison lisp/utils/crontab.el @ 173:8eaf7971accc r20-3b13
Import from CVS: tag r20-3b13
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:49:09 +0200 |
parents | 0293115a14e9 |
children | 2d532a89d707 |
comparison
equal
deleted
inserted
replaced
172:a38aed19690b | 173:8eaf7971accc |
---|---|
38 | 38 |
39 (provide 'crontab-edit) | 39 (provide 'crontab-edit) |
40 | 40 |
41 ;;; Local Variables. Define these to your liking. | 41 ;;; Local Variables. Define these to your liking. |
42 | 42 |
43 (defvar crontab-filename "~/.crontab" | 43 (defgroup crontab nil |
44 "*The name of the file to store the User's Crontab.") | 44 "Assist in editing crontab files." |
45 :group 'languages) | |
45 | 46 |
46 (defvar crontab-directory "/usr/spool/cron/crontabs" | |
47 "*The name of the directory in which crontab stores it's entries.") | |
48 | 47 |
49 (defvar crontab-use-local-file nil | 48 (defcustom crontab-filename "~/.crontab" |
49 "*The name of the file to store the User's Crontab." | |
50 :type 'file | |
51 :group 'crontab) | |
52 | |
53 (defcustom crontab-directory "/usr/spool/cron/crontabs" | |
54 "*The name of the directory in which crontab stores it's entries." | |
55 :type 'file | |
56 :group 'crontab) | |
57 | |
58 (defcustom crontab-use-local-file nil | |
50 "*Non-nil means use file stored in User's Home directory, if it exists. | 59 "*Non-nil means use file stored in User's Home directory, if it exists. |
51 Otherwise, always ask crontab for the current entry (maybe).") | 60 Otherwise, always ask crontab for the current entry (maybe)." |
61 :type 'boolean | |
62 :group 'crontab) | |
52 | 63 |
53 | 64 |
54 ;;; Interactive Function called to edit a Crontab Entry. It is called | 65 ;;; Interactive Function called to edit a Crontab Entry. It is called |
55 ;;; instead of crontab-edit to allow for future automatic entries. | 66 ;;; instead of crontab-edit to allow for future automatic entries. |
56 | 67 |