209 |
(mark (regexp-quote diary-nonmarking-symbol))) |
(mark (regexp-quote diary-nonmarking-symbol))) |
210 |
(calendar-for-loop i from 1 to number do |
(calendar-for-loop i from 1 to number do |
211 |
(let* ((d diary-date-forms) |
(let* ((d diary-date-forms) |
212 |
(idate (calendar-islamic-from-absolute |
(idate (calendar-islamic-from-absolute |
213 |
(calendar-absolute-from-gregorian gdate))) |
(calendar-absolute-from-gregorian gdate))) |
214 |
(month (extract-calendar-month idate)) |
(month (extract-calendar-month idate)) |
215 |
(day (extract-calendar-day idate)) |
(day (extract-calendar-day idate)) |
450 |
(make-diary-entry |
(make-diary-entry |
451 |
(concat |
(concat |
452 |
islamic-diary-entry-symbol |
islamic-diary-entry-symbol |
453 |
(calendar-date-string |
(calendar-date-string |
454 |
(calendar-islamic-from-absolute |
(calendar-islamic-from-absolute |
455 |
(calendar-absolute-from-gregorian |
(calendar-absolute-from-gregorian |
456 |
(calendar-cursor-to-date t))) |
(calendar-cursor-to-date t))) |
468 |
(make-diary-entry |
(make-diary-entry |
469 |
(concat |
(concat |
470 |
islamic-diary-entry-symbol |
islamic-diary-entry-symbol |
471 |
(calendar-date-string |
(calendar-date-string |
472 |
(calendar-islamic-from-absolute |
(calendar-islamic-from-absolute |
473 |
(calendar-absolute-from-gregorian |
(calendar-absolute-from-gregorian |
474 |
(calendar-cursor-to-date t))))) |
(calendar-cursor-to-date t))))) |
487 |
(make-diary-entry |
(make-diary-entry |
488 |
(concat |
(concat |
489 |
islamic-diary-entry-symbol |
islamic-diary-entry-symbol |
490 |
(calendar-date-string |
(calendar-date-string |
491 |
(calendar-islamic-from-absolute |
(calendar-islamic-from-absolute |
492 |
(calendar-absolute-from-gregorian |
(calendar-absolute-from-gregorian |
493 |
(calendar-cursor-to-date t))))) |
(calendar-cursor-to-date t))))) |