From mboxrd@z Thu Jan 1 00:00:00 1970 From: Rohan Nicholls Subject: Re: Re: remember integration problem with 6.06 Date: Thu, 18 Mar 2010 11:17:08 +0100 Message-ID: References: <407c66ac0809101126p8989024r8da5989a182c06b9@mail.gmail.com> <87prnbu6pb.fsf@cantor.griswold.home> <407c66ac0809110805g6518e70cp3e4ef69056d9ba0e@mail.gmail.com> Reply-To: rohan.nicholls@gmail.com Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NsCn0-00047S-Sm for emacs-orgmode@gnu.org; Thu, 18 Mar 2010 06:17:19 -0400 Received: from [140.186.70.92] (port=33905 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NsCmu-00040D-34 for emacs-orgmode@gnu.org; Thu, 18 Mar 2010 06:17:17 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1NsCms-0007AZ-HB for emacs-orgmode@gnu.org; Thu, 18 Mar 2010 06:17:11 -0400 Received: from mail-ew0-f170.google.com ([209.85.219.170]:58202) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NsCms-0007AQ-9c for emacs-orgmode@gnu.org; Thu, 18 Mar 2010 06:17:10 -0400 Received: by ewy10 with SMTP id 10so161188ewy.12 for ; Thu, 18 Mar 2010 03:17:08 -0700 (PDT) In-Reply-To: <407c66ac0809110805g6518e70cp3e4ef69056d9ba0e@mail.gmail.com> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Org Mode List Hi all I am getting the same error, and have (require 'org-install) in my init. I have remember bound to F5-r which then brings up a choice including (t)odo which is what I was trying to do. This has been showing up when using the git bleeding edge, and a pull has not helped. Here is the traceback: Debugger entered--Lisp error: (error "Autoloading failed to define function org-remember-annotation") org-remember-annotation() run-hook-with-args-until-success(org-remember-annotation) remember(nil) call-interactively(remember nil nil) I have done a find-function on the item, and the only thing it found in org.el is this: (eval-and-compile (org-autoload "org-remember" '(org-remember-insinuate org-remember-annotation org-remember-apply-template org-remember org-remember-handler))) Below are all the running details of the system. If anyone can point me in the right direction I would much appreciate it. I don't think I should be just giving this an empty function, but maybe I can get away with it. Thanks in advance, Rohan P.S. I am still wondering about ettiquette with mail. I have been using long-lines with emacs (mail) so readers do the wrapping automatically, and you don't get that hard return problem when in a narrow field, which could be on mobiles etc. Anyone know what the current norms are for this? hard wrap, or soft wrap? I am running: GNU Emacs 23.1.50.1 (x86_64-apple-darwin10.2.0, NS apple-appkit-1038.25) of 2010-02-10 this was compiled with homebrew in a mac os X, but the home system has a similar problem, and that is archlinux. Top of git log: commit ada3986f9d552f64e86caded38e0abac69bb9ae5 Merge: a27d1c2 8625e5c Author: Carsten Dominik Date: Wed Feb 24 10:35:37 2010 +0100 Merge branch 'master' of git+ssh://repo.or.cz/srv/git/org-mode org-version gives: Org-mode version 6.34trans (release_6.34c.105.gada3) And here are my org settings. As a note the 'recursive-files is something I whipped up in order to load everything into agenda under a directory. I found it ridiculous that there is nothing built into emacs to do this sort of thing, if I am wrong, please let me know. -------------------------------------------------------------------- ;; Org mode settings ;; org mode settings ;; The following lines are always needed. Choose your own keys. (require 'recursive-files) (add-to-list 'load-path (concat site-lisp-dir "/org-mode/lisp")) (add-to-list 'Info-directory-list (concat site-lisp-dir "/org-mode/doc")) (require 'org-install) (add-to-list 'auto-mode-alist '("\\.org$" . org-mode)) (add-hook 'org-mode-hook '(lambda () (auto-fill-mode t) (setq comment-start nil))) ; prefer return to activate a link (setq org-return-follows-link t) ;;;; This needs some major cleanup. (eval-after-load "org" '(progn (define-prefix-command 'org-bindings-keymap) (define-prefix-command 'org-todo-state-map) (define-key org-bindings-keymap (vector ?l) 'org-store-link) (define-key org-bindings-keymap (vector ?i) 'org-insert-link) (define-key org-bindings-keymap (vector ?a) 'org-agenda) (define-key org-bindings-keymap (vector ?s) 'org-todo-state-map) (define-key org-bindings-keymap (vector ?o) 'org-open-at-point-global) (define-key org-bindings-keymap (vector ?r) 'remember) (define-key org-todo-state-map "x" #'(lambda () "Set to Cancelled" (interactive) (org-todo "CANCELLED"))) (define-key org-todo-state-map "d" #'(lambda () "Set to Done" (interactive) (org-todo "DONE"))) (define-key org-todo-state-map "i" #'(lambda () "Set to In Progress"(interactive) (org-todo "IN PROGRESS"))) (define-key org-todo-state-map "w" #'(lambda () "Set to Waiting on Other" (interactive) (org-todo "WAITING ON OTHER"))) (define-key org-todo-state-map "n" #'(lambda () "Set Next Action " (interactive) (org-todo "NEXT ACTION"))) (define-key org-todo-state-map "r" #'(lambda () "Set to To Be Released" (interactive) (org-todo "TO BE RELEASED"))) (define-key org-todo-state-map "p" #'(lambda () "Set to Not A Priority" (interactive) (org-todo "NOT A PRIORITY"))) (define-key org-todo-state-map "s" #'(lambda () "Set to To Be Started" (interactive) (org-todo "TO BE STARTED"))) (define-key org-todo-state-map "f" #'(lambda () "Set to Fixed" (interactive) (org-todo "FIXED"))) (define-key org-todo-state-map "b" #'(lambda () "Set to Not A Bug" (interactive) (org-todo "NOT A BUG"))) ;; bind the keymap (global-set-key [(f5)] 'org-bindings-keymap) ;;; (define-key org-agenda-mode-map "\C-n" 'next-line) ;;; (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) (define-key org-mode-map [(control c)(control x)(r)] '(lambda (x) (interactive "P") (if x (org-demote-subtree) (org-do-demote)))) (define-key org-mode-map [(control c)(control x)(l)] '(lambda (x) (interactive "P") (if x (org-promote-subtree) (org-do-promote)))) ;;; And for just updating todo statistics with a key: (define-key org-bindings-keymap (vector ?u) '(lambda () (interactive) (org-update-parent-todo-statistics) (org-update-checkbox-count))) )) (defun find-agenda-includes() (let ((root (concat (getenv "HOME") "/notes")) (dir-list '("gtd" "informaat"))) (apply #'append (mapcar '(lambda (dir) (recfile-file-list (concat root "/" dir) ".*\\.org")) dir-list)))) ;; e.g. working ;; (find-agenda-includes) ;; (length '("/Users/rohann/notes/informaat/servers/lima.org" "/Users/rohann/notes/informaat/achmea/xml-transport.org" "/Users/rohann/notes/informaat/project-urls.org")) (defun update-agenda-includes() (interactive) (setf org-agenda-files (find-agenda-includes))) (setq org-refile-targets (mapcar #'(lambda (x) (append (list x) '(:maxlevel . 1))) (find-agenda-includes))) (setq org-completion-use-ido t) ;;;; APPT org stuff (org-agenda-to-appt) (appt-activate t) (setq appt-message-warning-time '60) (setq appt-display-interval '15) (setq appt-display-format 'window) (setq appt-disp-window-function (function my-appt-disp-window)) (defun my-appt-disp-window (min-to-app new-time msg) (save-window-excursion (shell-command (format "/usr/local/bin/growlnotify -m '%s' 'APPOINTMENT REMINDER'" ) nil nil))) ;; ;; remember and org settings (require 'remember nil t) (add-hook 'remember-mode-hook 'org-remember-apply-template) (setf org-directory "~/notes/" org-agenda-files (find-agenda-includes) ;; this is setup on boot. org-default-notes-file "~/notes/.notes" org-agenda-ndays 7 org-deadline-warning-days 14 org-agenda-show-all-dates 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 'expert org-agenda-custom-commands '(("d" todo "DELEGATED" nil) ("c" todo "DONE|DEFERRED|CANCELLED" nil) ("w" todo "TODO|ACTION|WAITING" nil) ("n" todo "NEXT ACTION" 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-log-note-state t ) (autoload 'org-remember-annotation "org") (autoload 'org-remember-apply-template "org") (autoload 'org-remember-handler "org") (setf org-remember-store-without-prompt t ;; generate different templates for different types of note remember-annotation-functions '(org-remember-annotation) remember-handler-functions '(org-remember-handler) org-remember-templates '(("Todo" ?t "* TODO %? %^g\n %i\n %u\n %a" "~/notes/gtd/todo.org" "Tasks") ("Note" ?j "* %u %?\n\n %i\n %a" "~/notes/gtd/notes.org" "Notes") ("Private" ?p "\n* %^{topic} %T \n%i%?\n" "~/notes/gtd/privnotes.org") ("Contact" ?c "\n* %^{Name} :CONTACT:\n%[l:/contemp.txt]\n" "~/notes/gtd/privnotes.org"))) ;; ;; agenda window configuration ;; ;;(setq org-agenda-window-setup 'reorganize-frame) (setq org-agenda-window-setup 'other-window) ;; ;; other values other-frame, current-window, other-window (setq org-agenda-restore-windows-after-quit t) (setq org-hide-leading-stars t) (setq org-todo-keywords '((sequence "TODO" "NEXT ACTION(n@/!)" "|" "DONE(d@/!)") (sequence "SOMEDAY(s@/!)" "WAITING ON OTHER(w@/!)" "PROCRASTINATING(p)" "NEXT ACTION(a@/!)" "TO BE RELEASED(r@/!)" "|" "NOT REPRODUCIBLE(!)" "FIXED(f@/!)" "NOT A BUG(b@/!)" "DELEGATED(d@/!)" "NOT A PRIORITY(!)" "DUPLICATE(@/!)") (sequence "|" "CANCELLED(c@/!)") (sequence "APPT(t!)" "|" "DONE")) org-log-done '(state)) ;; Have an item with subtasks it is counting automatically set ;; itself to done when all the subtasks are done. (defun org-summary-todo (n-done n-not-done) "Switch entry to DONE when all subentries are done, to TODO otherwise." (let (org-log-done org-log-states) ; turn off logging (org-todo (if (= n-not-done 0) "DONE" "TODO")))) (add-hook 'org-after-todo-statistics-hook 'org-summary-todo) ; On Thu, Sep 11, 2008 at 4:05 PM, JBash wrote: > That did it. > > Thanks for the help! > > On Wed, Sep 10, 2008 at 3:44 PM, Dan Griswold > wrote: >> >> JBash writes: >> >> > When I type 'Ctrl-C r', which used to bring up the remember template, I >> > now >> > get: >> > >> > run-hook-with-args-until-success: Autoloading failed to define function >> > org-remember-annotation >> >> >> How about: >> >> (require 'org-install) >> >> >> I recently had problems that were resolved when I uncommented that >> line in my config. :\ >> >> Dan >> >> >> -- >> -------------- >> Dan Griswold >> Rochester, NY >> -------------- >> >> >> >> _______________________________________________ >> 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 > > > _______________________________________________ > 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 > >