ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Release 5.06e

This commit is contained in:
Carsten Dominik 2008-01-31 11:36:02 +01:00
parent 49a33577a2
commit f0c766122d
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
org.el
View File

@ -5,7 +5,7 @@
;; Author: Carsten Dominik <dominik at science dot uva dot nl>
;; Keywords: outlines, hypermedia, calendar, wp
;; Homepage: http://www.astro.uva.nl/~dominik/Tools/org/
;; Version: 5.06d
;; Version: 5.06e
;;
;; This file is part of GNU Emacs.
;;
@ -83,7 +83,7 @@
;;; Version
(defconst org-version "5.06d"
(defconst org-version "5.06e"
"The version number of the file org.el.")
(defun org-version ()
(interactive)
@ -18321,7 +18321,8 @@ the documentation of `org-diary'."
(point))))
(setq donep (string-match org-looking-at-done-regexp head))
(if (string-match " \\([012]?[0-9]:[0-9][0-9]\\)" s)
(setq timestr (concat (match-string 1 s) " "))
(setq timestr
(concat (substring s (match-beginning 1)) " "))
(setq timestr nil))
(if (and donep
(or org-agenda-skip-deadline-if-done
@ -18396,7 +18397,8 @@ FRACTION is what fraction of the head-warning time has passed."
(progn (skip-chars-forward "^\r\n") (point))))
(setq donep (string-match org-looking-at-done-regexp head))
(if (string-match " \\([012]?[0-9]:[0-9][0-9]\\)" s)
(setq timestr (concat (match-string 1 s) " "))
(setq timestr
(concat (substring s (match-beginning 1)) " "))
(setq timestr nil))
(if (and donep
(or org-agenda-skip-scheduled-if-done