Lines Matching +defs:line +defs:number +defs:mode
49 If no argument is provided, the number of days of diary entries is governed
50 by the variable `number-of-diary-entries'. A value of ARG less than 1
99 (autoload 'diary-astro-day-number "cal-julian"
100 "Astronomical (Julian) day number diary entry.")
177 It is the standard syntax table used in Fundamental mode, but with the
185 (defvar number)
195 ((eq type 'int) (string-to-number attrvalue))
273 (defcustom diary-header-line-flag t
274 "If non-nil, `simple-diary-display' will show a header line.
275 The format of the header is specified by `diary-header-line-format'."
285 (defcustom diary-header-line-format
292 "Format of the header line displayed by `simple-diary-display'.
293 Only used if `diary-header-line-flag' is non-nil."
320 (defcustom number-of-diary-entries 1
336 number of days of diary entries displayed."
387 (defun diary-list-entries (date number &optional list-only)
422 (unless number
423 (setq number (if (vectorp number-of-diary-entries)
424 (aref number-of-diary-entries (calendar-day-of-week date))
425 number-of-diary-entries)))
426 (when (> number 0)
440 ;; Setup things like the header-line-format and invisibility-spec.
441 (if (eq major-mode default-major-mode)
442 (diary-mode)
444 ;; diary-header-line-flag after diary has been displayed
445 ;; take effect. Unconditionally calling (diary-mode)
449 (if (eq major-mode 'diary-mode)
450 (setq header-line-format (and diary-header-line-flag
451 diary-header-line-format))))
465 i from 1 to number do
514 ;; start in a blank line and end in a
559 (kill-local-variable 'mode-line-format))
588 (diary-list-entries original-date number)))
611 (calendar-set-mode-line (format "Diary for %s" hol-string))
619 (calendar-set-mode-line date-string)
661 (when (eq major-mode default-major-mode) (diary-mode))
798 (fancy-diary-display-mode)
799 (calendar-set-mode-line date-string)
806 (calendar-set-mode-line "Diary Entries")
816 visible lines of the diary buffer, add a heading line composed from the mode
817 line, print the temp buffer, and destroy it.
834 (if (not (stringp mode-line-format))
836 (string-match "^-*\\([^-].*[^-]\\)-*$" mode-line-format)
837 (match-string 1 mode-line-format)))
870 (when (eq major-mode default-major-mode) (diary-mode))
882 "Default number of days for `diary-mail-entries' to check."
973 (when (eq major-mode default-major-mode) (diary-mode))
1016 (mm (string-to-number
1020 (dd (string-to-number
1033 (y (+ (string-to-number y-str)
1041 (string-to-number y-str)))))
1043 (point) (line-end-position))
1094 sexp entry entry-start line-start marks)
1099 (setq line-start (point)))
1246 (+ (* 100 (string-to-number (match-string 1 s)))
1247 (string-to-number (match-string 2 s))))
1250 (+ (* 100 (% (string-to-number (match-string 1 s)) 12))
1255 (+ (* 100 (% (string-to-number (match-string 1 s)) 12))
1256 (string-to-number (match-string 2 s))
1288 A number of built-in functions are available for this type of diary entry:
1322 can contain %d or %d%s; %d will be replaced by the number
1324 by the ordinal ending of that number (that is, `st', `nd',
1334 can contain %d or %d%s; %d will be replaced by the number
1336 be replaced by the ordinal ending of that number (that is,
1343 single number or a list of numbers indicating the number(s)
1355 Diary entries giving the day of the year and the number of
1380 %%(diary-astro-day-number) Diary entries giving the corresponding
1381 astronomical (Julian) day number will be made every day.
1438 sexp entry specifier entry-start line-start)
1443 (setq line-start (point)))
1445 (buffer-substring-no-properties (1+ line-start) (point))
1446 entry-start (1+ line-start))
1470 (remove-overlays line-start (point) 'invisible 'diary)
1494 (message "Bad sexp at line %d in %s: %s"
1626 %d will be replaced by the number of years since the MONTH DAY, YEAR and the
1627 %s will be replaced by the ordinal ending of that number (that is, `st', `nd',
1650 ENTRY can contain `%d' or `%d%s'; the %d will be replaced by the number of
1652 ordinal ending of that number (that is, `st', `nd', `rd' or `th', as
1678 "Day of year and number of days remaining in the year of date diary entry."
1692 expressions that can involve the keywords `days' (a number), `date' (a list of
1699 SEXP is a diary-sexp. DAYS is either a single number or a list of numbers
1700 indicating the number(s) of days before the event that the warning(s) should
1708 A `diary-nonmarking-symbol' at the beginning of the line of the diary-remind
1748 (when (eq major-mode default-major-mode) (diary-mode))
1756 (beginning-of-line)
1758 (forward-line -1))
1855 (defvar diary-mode-map
1860 "Keymap for `diary-mode'.")
1863 (define-derived-mode diary-mode fundamental-mode "Diary"
1864 "Major mode for editing the diary file."
1869 (if diary-header-line-flag
1870 (setq header-line-format diary-header-line-format)))
1907 ;; Any number of " other holiday name" lines, followed by "==" line.
1927 (forward-line 0)
1928 (if (looking-at "=+$") (forward-line -1))
1930 (zerop (forward-line -1))))
1933 (setq beg (line-beginning-position)))
1935 (forward-line 0)
1937 (zerop (forward-line 1))))
1939 (setq end (line-beginning-position 2)))
1942 (define-derived-mode fancy-diary-display-mode fundamental-mode
1944 "Major mode used while displaying diary entries using Fancy Display."
2049 "Forms to highlight in `diary-mode'.")
2145 ((eq major-mode 'rmail-mode)
2147 ((memq major-mode '(gnus-summary-mode gnus-article-mode))
2149 (t (error "Don't know how to snarf in `%s'" major-mode)))))