[O] [bug, org.el] Wrong guess of future date

[Rasmus]

Hi,

There seems to be a bug in `org-read-date-analyze' so that when
re-scheduling from 2014 to 2014, the year is not updated.

Here's an example.  Type 30 in the rescheduling prompt.  It will be
rescheduled to <2014-12-30> rather than <2015-01-30> as expected when
org-read-date-prefer-future is non-nil.

(let* ((file (make-temp-file ""))
       (org-read-date-prefer-future t)
       (org-agenda-files (list file)))
  (save-window-excursion
    (find-file file)
    (insert "* TODO Document\nSCHEDULED: <2014-12-25>")
    (org-mode)
    (save-buffer))
  (org-agenda-list)
  (goto-char (point-min))
  (search-forward "TODO")
  (org-agenda-schedule 0)
  (find-file file)
  (goto-char (point-min))
  (org-show-entry))

I think the bug is in the sexp starting on line 16938 of org.el.
I don't know the agenda code well, so if someone can fix it would be
great; otherwise input on whether this is truly the place to fix this
behavior please let me know.

Thanks,
Rasmus

-- 
El Rey ha muerto. ¡Larga vida al Rey!