Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
7cef0cef
Commit
7cef0cef
authored
Apr 05, 2008
by
Glenn Morris
Browse files
Update for diary-entry-symbol renames.
parent
bf41c46c
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
6 additions
and
6 deletions
+6
-6
lisp/calendar/diary-lib.el
lisp/calendar/diary-lib.el
+6
-6
No files found.
lisp/calendar/diary-lib.el
View file @
7cef0cef
...
@@ -2094,17 +2094,17 @@ and return a font-lock pattern matching array of MONTHS and marking SYMBOL."
...
@@ -2094,17 +2094,17 @@ and return a font-lock pattern matching array of MONTHS and marking SYMBOL."
list-hebrew-diary-entries
list-hebrew-diary-entries
cal-hebrew
cal-hebrew
calendar-hebrew-month-name-array-leap-year
calendar-hebrew-month-name-array-leap-year
hebrew
-diary
-entry-symbol)
diary-
hebrew-entry-symbol)
(diary-font-lock-keywords-1 diary-islamic-mark-entries
(diary-font-lock-keywords-1 diary-islamic-mark-entries
diary-islamic-list-entries
diary-islamic-list-entries
cal-islam
cal-islam
calendar-islamic-month-name-array
calendar-islamic-month-name-array
islamic-
diary-
entry-symbol)
diary-
islamic-entry-symbol)
(diary-font-lock-keywords-1 diary-bahai-mark-entries
(diary-font-lock-keywords-1 diary-bahai-mark-entries
diary-bahai-list-entries
diary-bahai-list-entries
cal-bahai
cal-bahai
calendar-bahai-month-name-array
calendar-bahai-month-name-array
bahai-diary
-entry-symbol)
diary-bahai
-entry-symbol)
(list
(list
(cons
(cons
(format "
^%s.*$
" (regexp-quote diary-include-string))
(format "
^%s.*$
" (regexp-quote diary-include-string))
...
@@ -2119,9 +2119,9 @@ and return a font-lock pattern matching array of MONTHS and marking SYMBOL."
...
@@ -2119,9 +2119,9 @@ and return a font-lock pattern matching array of MONTHS and marking SYMBOL."
(cons
(cons
(format "
^%s?%s
" (regexp-quote diary-nonmarking-symbol)
(format "
^%s?%s
" (regexp-quote diary-nonmarking-symbol)
(regexp-opt (mapcar 'regexp-quote
(regexp-opt (mapcar 'regexp-quote
(list hebrew
-diary
-entry-symbol
(list
diary-
hebrew-entry-symbol
islamic-
diary-
entry-symbol
diary-
islamic-entry-symbol
bahai-diary
-entry-symbol))
diary-bahai
-entry-symbol))
t))
t))
'(1 font-lock-reference-face))
'(1 font-lock-reference-face))
'(diary-font-lock-sexps . font-lock-keyword-face)
'(diary-font-lock-sexps . font-lock-keyword-face)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment