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 <carsten.domi...@gmail.com>
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 <bashve...@gmail.com> wrote:
That did it.
Thanks for the help!
On Wed, Sep 10, 2008 at 3:44 PM, Dan Griswold
<dgris...@rochester.rr.com>
wrote:
JBash <bashve...@gmail.com> 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
_______________________________________________
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
