From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: Re: remember integration problem with 6.06 Date: Fri, 19 Mar 2010 18:34:25 +0100 Message-ID: <2B434AE3-A1B4-49CC-BF01-ED4DA492BF4C@gmail.com> References: <407c66ac0809101126p8989024r8da5989a182c06b9@mail.gmail.com> <87prnbu6pb.fsf@cantor.griswold.home> <407c66ac0809110805g6518e70cp3e4ef69056d9ba0e@mail.gmail.com> Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1NshIW-0001bw-47 for emacs-orgmode@gnu.org; Fri, 19 Mar 2010 14:51:52 -0400 Received: from [140.186.70.92] (port=50129 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1NshIQ-0001Xn-FO for emacs-orgmode@gnu.org; Fri, 19 Mar 2010 14:51:51 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.69) (envelope-from ) id 1NshIN-0006Qy-8E for emacs-orgmode@gnu.org; Fri, 19 Mar 2010 14:51:46 -0400 Received: from ey-out-1920.google.com ([74.125.78.144]:15716) by eggs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1NshIM-0006Pa-UH for emacs-orgmode@gnu.org; Fri, 19 Mar 2010 14:51:43 -0400 Received: by ey-out-1920.google.com with SMTP id 4so293006eyg.34 for ; Fri, 19 Mar 2010 11:51:42 -0700 (PDT) In-Reply-To: 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: rohan.nicholls@gmail.com Cc: Org Mode List Hi Rohan, if you are getting your org distribution through git, then you need to make at least org-install.el like this. make autoloads Otherwise, your (require 'org-install) might pick the empty org-install.el that comes with Emacs. You can also type "make" to compile all lisp files, and this will *also* produce lisp/org-install.el If you do M-x find-library RET org-install RET, you will know which one you are currently loading, and if org-remember-annotation is in there. HTH - Carsten On Mar 18, 2010, at 11:17 AM, Rohan Nicholls wrote: > 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 >> >> > > > _______________________________________________ > Emacs-orgmode mailing list > Please use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode - Carsten