Mercurial > emacs
comparison lisp/textmodes/org.el @ 68175:85897d09e200
(org-get-time-of-day): Fixed bug with times before 1am.
| author | Carsten Dominik <dominik@science.uva.nl> |
|---|---|
| date | Fri, 13 Jan 2006 14:17:37 +0000 |
| parents | 0164d7cc3832 |
| children | 1a47b5a03b4a 7beb78bc1f8e |
comparison
equal
deleted
inserted
replaced
| 68174:dceda15bdee3 | 68175:85897d09e200 |
|---|---|
| 5784 12 0))) | 5784 12 0))) |
| 5785 (if (match-beginning 3) | 5785 (if (match-beginning 3) |
| 5786 (string-to-number (match-string 3 s)) | 5786 (string-to-number (match-string 3 s)) |
| 5787 0))) | 5787 0))) |
| 5788 (t1 (concat " " | 5788 (t1 (concat " " |
| 5789 (if (< t0 100) "0" "") | 5789 (if (< t0 100) "0" "") (if (< t0 10) "0" "") |
| 5790 (int-to-string t0)))) | 5790 (int-to-string t0)))) |
| 5791 (if string (concat (substring t1 -4 -2) ":" (substring t1 -2)) t0))))) | 5791 (if string (concat (substring t1 -4 -2) ":" (substring t1 -2)) t0))))) |
| 5792 | 5792 |
| 5793 (defun org-finalize-agenda-entries (list) | 5793 (defun org-finalize-agenda-entries (list) |
| 5794 "Sort and concatenate the agenda items." | 5794 "Sort and concatenate the agenda items." |