Re: Update of orgmode broke my setup

[Detlef Steuer <steuer@unibwh.de>]

On Thu, 3 Jul 2008 16:45:50 +0530
Manish <mailtomanish.sharma@gmail.com> wrote:

>   On Thu, Jul 3, 2008 at 2:16 PM, Detlef Steuer wrote:
>   > Hi,
>   >
>   > after upgrading my orgmode installation I get:
>   > ----------
>   > An error has occurred while loading `/home/steuer/.emacs':
>   >
>   > Symbol's value as variable is void: org-agenda-mode-map
>   >
>   > To ensure normal operation, you should investigate and remove the
>   > cause of the error in your initialization file.  Start Emacs with
>   > the `--debug-init' option to view a complete error backtrace.
>   > ---------
>   >
>   > I'm using a setup followig Wiegley
>   > http://www.newartisans.com/blog_files/org.mode.day.planner.php
>   >
>   > The effect is, that agenda commands like C-a a don't work any more.
>   >
>   > Ok, it must be simple, but I can't find it at the moment.
>   > Any hint?
> 
> Could you add details of your setup?  Emacs version, previous and
> new versions of Org, using git or release versions etc.

 emacs --version
GNU Emacs 22.1.1
Copyright (C) 2007 Free Software Foundation, Inc.
GNU Emacs comes with ABSOLUTELY NO WARRANTY.
You may redistribute copies of Emacs
under the terms of the GNU General Public License.
For more information about these matters, see the file named COPYING.

git before update some 6.04 
git after 6.05c and todays git pull .

relevant part of .emacs (unchanged):

;;;; Org Mode ;;;
(require 'org-install)
(setq org-log-done t)

;; The following lines are always needed.  Choose your own keys.
(add-to-list 'auto-mode-alist '("\\.org\\'" . org-mode))
(global-set-key "\C-cl" 'org-store-link)
(global-set-key "\C-ca" 'org-agenda)

(add-hook 'org-mode-hook 'turn-on-font-lock)  ; org-mode buffers only

;; remind mode
(add-to-list 'load-path "~/.emacs.d/remind")
(require 'remind-conf-mode) 

;; remember mode
(add-to-list 'load-path "~/.emacs.d/remember")
(require 'remember)

(org-remember-insinuate)
(setq org-directory "~/.pim/")
(setq org-default-notes-file (concat org-directory "/.pim/notes.org"))
(define-key global-map "\C-cr" 'org-remember)

;; from Wiegley's article
;; (require 'org-install)

(add-to-list 'auto-mode-alist '("\\.org$" . org-mode))

(define-key mode-specific-map [?a] 'org-agenda)

(eval-after-load "org"
  '(progn
     (define-prefix-command 'org-todo-state-map)
     (define-key org-mode-map "\C-cx" 'org-todo-state-map)
     (define-key org-todo-state-map "t"
       #'(lambda nil (interactive) (org-todo "TODO")))
     (define-key org-todo-state-map "x"
       #'(lambda nil (interactive) (org-todo "CANCELLED")))
     (define-key org-todo-state-map "d"
       #'(lambda nil (interactive) (org-todo "DONE")))
     (define-key org-todo-state-map "f"
       #'(lambda nil (interactive) (org-todo "DEFERRED")))
     (define-key org-todo-state-map "l"
       #'(lambda nil (interactive) (org-todo "DELEGATED")))
     (define-key org-todo-state-map "s"
       #'(lambda nil (interactive) (org-todo "STARTED")))
     (define-key org-todo-state-map "w"
       #'(lambda nil (interactive) (org-todo "WAITING")))
==>     (define-key org-agenda-mode-map "\C-n" 'next-line)
gives error


     (define-key org-agenda-keymap "\C-n" 'next-line)
     (define-key org-agenda-mode-map "\C-p" 'previous-line)
     (define-key org-agenda-keymap "\C-p" 'previous-line)))

(require 'remember)
(add-hook 'remember-mode-hook 'org-remember-apply-template)
(define-key global-map [(control meta ?r)] 'remember)

(custom-set-variables
 '(org-agenda-files (quote ("~/.pim/todo.org" "~/.pim/remindout.org")))
 '(org-default-notes-file "~/.pim/notes.org")
 '(org-agenda-ndays 7)
 '(org-deadline-warning-days 14)
 '(org-agenda-show-all-dates t)
 '(org-agenda-skip-deadline-if-done t)
 '(org-agenda-skip-scheduled-if-done t)
 '(org-agenda-start-on-weekday nil)
 '(org-reverse-note-order t)
 '(org-fast-tag-selection-single-key (quote expert))
 '(org-agenda-custom-commands
   (quote (("d" todo "DELEGATED" nil)
           ("c" todo "DONE|DEFERRED|CANCELLED" nil)
           ("w" todo "WAITING" nil)
           ("W" agenda "" ((org-agenda-ndays 21)))
    ("A" agenda ""
      ((org-agenda-skip-function
       (lambda nil
             (org-agenda-skip-entry-if (quote notregexp) "\\=.*\\[#A\\]")))
             (org-agenda-ndays 1)
           (org-agenda-overriding-header "Today's Priority #A tasks: ")))
     ("u" alltodo ""
     ((org-agenda-skip-function
       (lambda nil
             (org-agenda-skip-entry-if (quote scheduled) (quote deadline)
                                     (quote regexp) "<[^>\n]+>")))
           (org-agenda-overriding-header "Unscheduled TODO entries: "))))))
 '(org-remember-store-without-prompt t)
 '(org-remember-templates
   (quote ((116 "* TODO %?\n  %u" "~/.pim/todo.org" "Inbox")
           (110 "* %u %?" "~/.pim/notes.org" "Notes"))))

'(remember-annotation-functions (quote (org-remember-annotation)))
'(remember-handler-functions (quote (org-remember-handler))))

--Detlef

> 
> -- Manish
> 
> 
> _______________________________________________
> Emacs-orgmode mailing list
> Remember: use `Reply All' to send replies to the list.
> Emacs-orgmode@gnu.org
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>