From: Rohan Nicholls <rohan.nicholls@googlemail.com>
To: Org Mode List <emacs-orgmode@gnu.org>
Subject: Re: Re: remember integration problem with 6.06
Date: Thu, 18 Mar 2010 11:17:08 +0100 [thread overview]
Message-ID: <ec6fed891003180317qb2e3f66pee08ad545bd10dfd@mail.gmail.com> (raw)
In-Reply-To: <407c66ac0809110805g6518e70cp3e4ef69056d9ba0e@mail.gmail.com>
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.dominik@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 <bashveank@gmail.com> wrote:
> That did it.
>
> Thanks for the help!
>
> On Wed, Sep 10, 2008 at 3:44 PM, Dan Griswold
<dgriswol@rochester.rr.com>
> wrote:
>>
>> JBash <bashveank@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
>
>
next prev parent reply other threads:[~2010-03-18 10:17 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2008-09-10 18:26 remember integration problem with 6.06 JBash
2008-09-10 19:23 ` Heinz R. Hopfgartner
2008-09-10 19:44 ` Dan Griswold
2008-09-11 15:05 ` JBash
2010-03-18 10:17 ` Rohan Nicholls [this message]
2010-03-19 17:34 ` Carsten Dominik
2010-03-19 21:41 ` Rohan Nicholls
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=ec6fed891003180317qb2e3f66pee08ad545bd10dfd@mail.gmail.com \
--to=rohan.nicholls@googlemail.com \
--cc=emacs-orgmode@gnu.org \
--cc=rohan.nicholls@gmail.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.