Mercurial > emacs

comparison lisp/textmodes/org.el @ 70019:a186cf26482b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Carsten Dominik <dominik@science.uva.nl>
date Thu, 13 Apr 2006 16:41:10 +0000
parents 513397bbb13c
children 28d6f65fa9e6 c156f6a9e7b5
comparison
equal deleted inserted replaced
70018:513397bbb13c 70019:a186cf26482b
5177 (calendar-gregorian-from-absolute sd))) 5177 (calendar-gregorian-from-absolute sd)))
5178 (n1 org-agenda-start-on-weekday) 5178 (n1 org-agenda-start-on-weekday)
5179 (d (- nt n1))) 5179 (d (- nt n1)))
5180 (- sd (+ (if (< d 0) 7 0) d))))) 5180 (- sd (+ (if (< d 0) 7 0) d)))))
5181 (day-numbers (list start)) 5181 (day-numbers (list start))
5182 ;FIXME (inhibit-redisplay t) 5182 (inhibit-redisplay t)
5183 s e rtn rtnall file date d start-pos end-pos todayp nd) 5183 s e rtn rtnall file date d start-pos end-pos todayp nd)
5184 (setq org-agenda-redo-command 5184 (setq org-agenda-redo-command
5185 (list 'org-agenda-list (list 'quote include-all) start-day ndays t)) 5185 (list 'org-agenda-list (list 'quote include-all) start-day ndays t))
5186 ;; Make the list of days 5186 ;; Make the list of days
5187 (setq ndays (or ndays org-agenda-ndays) 5187 (setq ndays (or ndays org-agenda-ndays)