* org-default-notes-file
@ 2010-10-18 6:43 Louis Turk
2010-10-18 7:16 ` org-default-notes-file Noorul Islam K M
0 siblings, 1 reply; 19+ messages in thread
From: Louis Turk @ 2010-10-18 6:43 UTC (permalink / raw)
To: emacs-orgmode
Hi everyone,
I trying to set up capture to use refile.org as the default notes file.
lat-a-ws% locate refile.org
/home/lat/org/refile.org
lat-a-ws%
(setq org-default-notes-file "~/org/refile.org")
But I get:
Debugger entered--Lisp error: (void-function org-string-nw-p)
(org-string-nw-p file)
(or (org-string-nw-p file) org-default-notes-file (error "No notes
file specified, and no default available"))
(setq file (or (org-string-nw-p file) org-default-notes-file (error
"No notes file specified, and no default available")))
org-capture-target-buffer("~/org/refile.org")
(set-buffer (org-capture-target-buffer (nth 1 target)))
How do I fix this?
lou
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 6:43 org-default-notes-file Louis Turk
@ 2010-10-18 7:16 ` Noorul Islam K M
2010-10-18 8:45 ` org-default-notes-file Andreas Röhler
[not found] ` <4CBC0BC1.40304@dayspringpublisher.com>
0 siblings, 2 replies; 19+ messages in thread
From: Noorul Islam K M @ 2010-10-18 7:16 UTC (permalink / raw)
To: Louis Turk; +Cc: emacs-orgmode
Louis Turk <lou@dayspringpublisher.com> writes:
> Hi everyone,
>
> I trying to set up capture to use refile.org as the default notes file.
>
> lat-a-ws% locate refile.org
> /home/lat/org/refile.org
> lat-a-ws%
>
> (setq org-default-notes-file "~/org/refile.org")
>
> But I get:
>
> Debugger entered--Lisp error: (void-function org-string-nw-p)
> (org-string-nw-p file)
> (or (org-string-nw-p file) org-default-notes-file (error "No notes
> file specified, and no default available"))
> (setq file (or (org-string-nw-p file) org-default-notes-file (error
> "No notes file specified, and no default available")))
> org-capture-target-buffer("~/org/refile.org")
> (set-buffer (org-capture-target-buffer (nth 1 target)))
>
> How do I fix this?
>
This function is defined in org-macs.el. I think you should have in your
.emacs.
(require 'org-macs)
Thanks and Regards
Noorul
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: Re: org-default-notes-file
2010-10-18 7:16 ` org-default-notes-file Noorul Islam K M
@ 2010-10-18 8:45 ` Andreas Röhler
2010-10-18 9:02 ` org-default-notes-file Noorul Islam K M
[not found] ` <4CBC0BC1.40304@dayspringpublisher.com>
1 sibling, 1 reply; 19+ messages in thread
From: Andreas Röhler @ 2010-10-18 8:45 UTC (permalink / raw)
To: emacs-orgmode; +Cc: Noorul Islam K M
Am 18.10.2010 09:16, schrieb Noorul Islam K M:
> Louis Turk<lou@dayspringpublisher.com> writes:
>
>> Hi everyone,
>>
>> I trying to set up capture to use refile.org as the default notes file.
>>
>> lat-a-ws% locate refile.org
>> /home/lat/org/refile.org
>> lat-a-ws%
>>
>> (setq org-default-notes-file "~/org/refile.org")
>>
>> But I get:
>>
>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>> (org-string-nw-p file)
>> (or (org-string-nw-p file) org-default-notes-file (error "No notes
>> file specified, and no default available"))
>> (setq file (or (org-string-nw-p file) org-default-notes-file (error
>> "No notes file specified, and no default available")))
>> org-capture-target-buffer("~/org/refile.org")
>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>
>> How do I fix this?
>>
>
> This function is defined in org-macs.el. I think you should have in your
> .emacs.
>
> (require 'org-macs)
>
> Thanks and Regards
> Noorul
>
Hi Noorul,
would this not indicate a bug anyway?
IMHO functions needed should be available, if org-mode is activated.
BTW at my machine org-string-nw-p is defined in the git-repo only, not
in the installed org-macs.el.
HTH
Andreas
--
https://code.launchpad.net/~a-roehler/python-mode/python-mode-components
https://code.launchpad.net/s-x-emacs-werkstatt/
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 8:45 ` org-default-notes-file Andreas Röhler
@ 2010-10-18 9:02 ` Noorul Islam K M
2010-10-18 9:39 ` org-default-notes-file Andreas Röhler
0 siblings, 1 reply; 19+ messages in thread
From: Noorul Islam K M @ 2010-10-18 9:02 UTC (permalink / raw)
To: Andreas Röhler; +Cc: emacs-orgmode
Andreas Röhler <andreas.roehler@easy-emacs.de> writes:
> Am 18.10.2010 09:16, schrieb Noorul Islam K M:
>
>> Louis Turk<lou@dayspringpublisher.com> writes:
>>
>>> Hi everyone,
>>>
>>> I trying to set up capture to use refile.org as the default notes file.
>>>
>>> lat-a-ws% locate refile.org
>>> /home/lat/org/refile.org
>>> lat-a-ws%
>>>
>>> (setq org-default-notes-file "~/org/refile.org")
>>>
>>> But I get:
>>>
>>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>>> (org-string-nw-p file)
>>> (or (org-string-nw-p file) org-default-notes-file (error "No notes
>>> file specified, and no default available"))
>>> (setq file (or (org-string-nw-p file) org-default-notes-file (error
>>> "No notes file specified, and no default available")))
>>> org-capture-target-buffer("~/org/refile.org")
>>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>>
>>> How do I fix this?
>>>
>>
>> This function is defined in org-macs.el. I think you should have in your
>> .emacs.
>>
>> (require 'org-macs)
>>
>> Thanks and Regards
>> Noorul
>>
>
> Hi Noorul,
>
> would this not indicate a bug anyway?
> IMHO functions needed should be available, if org-mode is activated.
>
> BTW at my machine org-string-nw-p is defined in the git-repo only, not
> in the installed org-macs.el.
>
> HTH
>
Strange that org-string-nw-p is not there in org-macs.el.
Which version of orgmode and emacs are you using? Also are you trying to
setup orgmode for the first time? If so do you mind sharing .emacs?
Thanks and Regards
Noorul
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
[not found] ` <4CBC0BC1.40304@dayspringpublisher.com>
@ 2010-10-18 9:09 ` Noorul Islam K M
[not found] ` <4CBC101F.3020103@dayspringpublisher.com>
0 siblings, 1 reply; 19+ messages in thread
From: Noorul Islam K M @ 2010-10-18 9:09 UTC (permalink / raw)
To: Louis Turk; +Cc: emacs-orgmode
Louis Turk <lou@dayspringpublisher.com> writes:
> On 10/18/2010 03:16 PM, Noorul Islam K M wrote:
>
>> Louis Turk<lou@dayspringpublisher.com> writes:
>>
>>> Hi everyone,
>>>
>>> I trying to set up capture to use refile.org as the default notes file.
>>>
>>> lat-a-ws% locate refile.org
>>> /home/lat/org/refile.org
>>> lat-a-ws%
>>>
>>> (setq org-default-notes-file "~/org/refile.org")
>>>
>>> But I get:
>>>
>>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>>> (org-string-nw-p file)
>>> (or (org-string-nw-p file) org-default-notes-file (error "No notes
>>> file specified, and no default available"))
>>> (setq file (or (org-string-nw-p file) org-default-notes-file (error
>>> "No notes file specified, and no default available")))
>>> org-capture-target-buffer("~/org/refile.org")
>>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>>
>>> How do I fix this?
>>>
>> This function is defined in org-macs.el. I think you should have in your
>> .emacs.
>>
>> (require 'org-macs)
>>
>> Thanks and Regards
>> Noorul
>
> Thanks for responding, but that doesn't seem to cure the problem. I
> still get the same error message.
>
Which version of emacs and org-mode are you using?
M-x emacs-version
M-x org-version
Thanks and Regards
Noorul
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
[not found] ` <4CBC101F.3020103@dayspringpublisher.com>
@ 2010-10-18 9:20 ` Noorul Islam K M
2010-10-18 9:53 ` org-default-notes-file Louis Turk
0 siblings, 1 reply; 19+ messages in thread
From: Noorul Islam K M @ 2010-10-18 9:20 UTC (permalink / raw)
To: Louis Turk; +Cc: emacs-orgmode
Louis Turk <lou@dayspringpublisher.com> writes:
> On 10/18/2010 05:09 PM, Noorul Islam K M wrote:
>
>> Louis Turk<lou@dayspringpublisher.com> writes:
>>
>>> On 10/18/2010 03:16 PM, Noorul Islam K M wrote:
>>>
>>>> Louis Turk<lou@dayspringpublisher.com> writes:
>>>>
>>>>> Hi everyone,
>>>>>
>>>>> I trying to set up capture to use refile.org as the default notes file.
>>>>>
>>>>> lat-a-ws% locate refile.org
>>>>> /home/lat/org/refile.org
>>>>> lat-a-ws%
>>>>>
>>>>> (setq org-default-notes-file "~/org/refile.org")
>>>>>
>>>>> But I get:
>>>>>
>>>>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>>>>> (org-string-nw-p file)
>>>>> (or (org-string-nw-p file) org-default-notes-file (error "No notes
>>>>> file specified, and no default available"))
>>>>> (setq file (or (org-string-nw-p file) org-default-notes-file (error
>>>>> "No notes file specified, and no default available")))
>>>>> org-capture-target-buffer("~/org/refile.org")
>>>>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>>>>
>>>>> How do I fix this?
>>>>>
>>>> This function is defined in org-macs.el. I think you should have in your
>>>> .emacs.
>>>>
>>>> (require 'org-macs)
>>>>
>>>> Thanks and Regards
>>>> Noorul
>>> Thanks for responding, but that doesn't seem to cure the problem. I
>>> still get the same error message.
>>>
>> Which version of emacs and org-mode are you using?
>>
>> M-x emacs-version
>> M-x org-version
>>
>> Thanks and Regards
>> Noorul
> GNU Emacs 23.2.1 (x86_64-unknown-linux-gnu, GTK+ Version 2.20.0) of
> 2010-05-08 on pidsley.hoetzel.info
>
> Org-mode version 6.33x (release_7.01h.718.g0cb3c5.dirty)
>
> also, I'm using archlinux
>
I think you should use "Reply-To All" so that everyone in the list can
see your message and help out.
It looks like there is a collision of org-mode versions? Do you have
multiple org-mode installations?
I think 6.33x is the one that comes with emacs and release 7.01h is the
latest. Ensure that you have the latest version ahead in load path.
Thanks and Regards
Noorul
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 9:02 ` org-default-notes-file Noorul Islam K M
@ 2010-10-18 9:39 ` Andreas Röhler
2010-10-18 11:10 ` org-default-notes-file Louis Turk
0 siblings, 1 reply; 19+ messages in thread
From: Andreas Röhler @ 2010-10-18 9:39 UTC (permalink / raw)
To: Noorul Islam K M; +Cc: emacs-orgmode
Am 18.10.2010 11:02, schrieb Noorul Islam K M:
> Andreas Röhler<andreas.roehler@easy-emacs.de> writes:
>
>> Am 18.10.2010 09:16, schrieb Noorul Islam K M:
>>
>>> Louis Turk<lou@dayspringpublisher.com> writes:
>>>
>>>> Hi everyone,
>>>>
>>>> I trying to set up capture to use refile.org as the default notes file.
>>>>
>>>> lat-a-ws% locate refile.org
>>>> /home/lat/org/refile.org
>>>> lat-a-ws%
>>>>
>>>> (setq org-default-notes-file "~/org/refile.org")
>>>>
>>>> But I get:
>>>>
>>>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>>>> (org-string-nw-p file)
>>>> (or (org-string-nw-p file) org-default-notes-file (error "No notes
>>>> file specified, and no default available"))
>>>> (setq file (or (org-string-nw-p file) org-default-notes-file (error
>>>> "No notes file specified, and no default available")))
>>>> org-capture-target-buffer("~/org/refile.org")
>>>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>>>
>>>> How do I fix this?
>>>>
>>>
>>> This function is defined in org-macs.el. I think you should have in your
>>> .emacs.
>>>
>>> (require 'org-macs)
>>>
>>> Thanks and Regards
>>> Noorul
>>>
>>
>> Hi Noorul,
>>
>> would this not indicate a bug anyway?
>> IMHO functions needed should be available, if org-mode is activated.
>>
>> BTW at my machine org-string-nw-p is defined in the git-repo only, not
>> in the installed org-macs.el.
>>
>> HTH
>>
>
> Strange that org-string-nw-p is not there in org-macs.el.
Seems not that strange for me.
git blame says,
org-mobile.el, where it's defined, started 2009-09-15
So vendors might not have it, it's not distributed yet maybe.
If distributed, (require 'org-macs)
isn't needed BTW, because org.el already requires it then.
So my recommendation is just to load the git-version:
git clone git://repo.or.cz/org-mode.git
Andreas
>
> Which version of orgmode and emacs are you using? Also are you trying to
> setup orgmode for the first time? If so do you mind sharing .emacs?
>
> Thanks and Regards
> Noorul
>
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 9:20 ` org-default-notes-file Noorul Islam K M
@ 2010-10-18 9:53 ` Louis Turk
2010-10-18 10:03 ` org-default-notes-file Noorul Islam K M
0 siblings, 1 reply; 19+ messages in thread
From: Louis Turk @ 2010-10-18 9:53 UTC (permalink / raw)
To: Noorul Islam K M; +Cc: emacs-orgmode
On 10/18/2010 05:20 PM, Noorul Islam K M wrote:
> Louis Turk<lou@dayspringpublisher.com> writes:
>
>> On 10/18/2010 05:09 PM, Noorul Islam K M wrote:
>>
>>> Louis Turk<lou@dayspringpublisher.com> writes:
>>>
>>>> On 10/18/2010 03:16 PM, Noorul Islam K M wrote:
>>>>
>>>>> Louis Turk<lou@dayspringpublisher.com> writes:
>>>>>
>>>>>> Hi everyone,
>>>>>>
>>>>>> I trying to set up capture to use refile.org as the default notes file.
>>>>>>
>>>>>> lat-a-ws% locate refile.org
>>>>>> /home/lat/org/refile.org
>>>>>> lat-a-ws%
>>>>>>
>>>>>> (setq org-default-notes-file "~/org/refile.org")
>>>>>>
>>>>>> But I get:
>>>>>>
>>>>>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>>>>>> (org-string-nw-p file)
>>>>>> (or (org-string-nw-p file) org-default-notes-file (error "No notes
>>>>>> file specified, and no default available"))
>>>>>> (setq file (or (org-string-nw-p file) org-default-notes-file (error
>>>>>> "No notes file specified, and no default available")))
>>>>>> org-capture-target-buffer("~/org/refile.org")
>>>>>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>>>>>
>>>>>> How do I fix this?
>>>>>>
>>>>> This function is defined in org-macs.el. I think you should have in your
>>>>> .emacs.
>>>>>
>>>>> (require 'org-macs)
>>>>>
>>>>> Thanks and Regards
>>>>> Noorul
>>>> Thanks for responding, but that doesn't seem to cure the problem. I
>>>> still get the same error message.
>>>>
>>> Which version of emacs and org-mode are you using?
>>>
>>> M-x emacs-version
>>> M-x org-version
>>>
>>> Thanks and Regards
>>> Noorul
>> GNU Emacs 23.2.1 (x86_64-unknown-linux-gnu, GTK+ Version 2.20.0) of
>> 2010-05-08 on pidsley.hoetzel.info
>>
>> Org-mode version 6.33x (release_7.01h.718.g0cb3c5.dirty)
>>
>> also, I'm using archlinux
>>
> I think you should use "Reply-To All" so that everyone in the list can
> see your message and help out.
Thanks. I didn't realize I wasn't replying to the list.
> It looks like there is a collision of org-mode versions? Do you have
> multiple org-mode installations?
Not on purpose, but probably. I think I used git to get the latest
org-mode.
> I think 6.33x is the one that comes with emacs and release 7.01h is the
> latest. Ensure that you have the latest version ahead in load path.
>
> Thanks and Regards
> Noorul
This is my .emacs, if that will help. Perhaps something in my .emacs is
conflicting. It probably needs a lot of cleaning up.
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(canlock-password "129de665b1f8f1c95eaaa9daca897b054d323b2b")
'(column-number-mode t)
'(current-language-environment "UTF-8")
'(debug-on-error t)
'(muse-project-alist (quote (("WikiPlanner" ("~/plans" :default
"index" :major-mode planner-mode :visit-link planner-visit-link)))))
'(org-agenda-files (quote ("~/org/anniversaries.org"
"~/org/schedule.org" "~/org/projects.org")))
'(safe-local-variable-values (quote ((Package . CL-PPCRE) (Syntax .
COMMON-LISP) (Package . CL-USER) (Base . 10))))
'(save-place t nil (saveplace))
'(scroll-bar-mode (quote right))
'(show-paren-mode t)
'(size-indication-mode t)
'(uniquify-buffer-name-style (quote forward) nil (uniquify))
'(vc-handled-backends (quote (Git SVN CVS RCS SCCS Arch))))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(default ((t (:inherit nil :stipple nil :background "honeydew"
:foreground "black" :inverse-video nil :box nil :strike-through nil
:overline nil :underline nil :slant normal :weight normal :height 136
:width normal :foundry "unknown" :family "Gentium")))))
(global-set-key "\C-x\C-m" 'execute-extended-command)
(global-set-key "\C-c\C-m" 'execute-extended-command)
;(setq custom-file "~/.emacs-custom.elc")
;(load custom-file)
(setq inhibit-splash-screen '(t))
(put 'downcase-region 'disabled nil)
(put 'upcase-region 'disabled nil)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Maltron keyboard navagation
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Moving down ----------------
(global-set-key (kbd "s-k") 'next-line)
(global-set-key (kbd "s-o") 'forward-char)
(global-set-key (kbd "s-r") 'forward-word)
(global-set-key (kbd "s-'") 'forward-sentence)
(global-set-key (kbd "s-l") 'forward-paragraph)
(global-set-key (kbd "s-z") 'forward-page)
(global-set-key (kbd "s-x") 'end-of-buffer)
;; Moving up ---------------------
(global-set-key (kbd "s-u") 'previous-line)
(global-set-key (kbd "s-t") 'backward-char)
(global-set-key (kbd "s-d") 'backward-word)
(global-set-key (kbd "s-m") 'backward-sentence)
(global-set-key (kbd "s-v") 'backward-paragraph)
(global-set-key (kbd "s-w") 'backward-page)
(global-set-key (kbd "s-;") 'beginning-of-buffer)
;; Move to middle ----------------
(defun goto-middle-of-line ()
(interactive)
(let ((begin (progn (beginning-of-line) (point)))
(end (progn (end-of-line) (point))))
(goto-char (/ (+ begin end) 2))))
(global-set-key (kbd "s-h") 'goto-middle-of-line)
;; Search forward
(global-set-key (kbd "C-s-=") 'isearch-backward)
(global-set-key (kbd "s-=") 'isearch-forward)
;; Move the contents of the buffer up or down without changing the
cursor position ======
(global-set-key (kbd "M-<down>") (lambda () (interactive) (scroll-up 1)))
(global-set-key (kbd "M-<up>") (lambda () (interactive) (scroll-down 1)))
;; =====================================================
(setq x-select-enable-clipboard t)
(setq imap-log t)
;; I hate tabs!
(setq-default indent-tabs-mode nil)
;; Remove tabs while saving.
(defun java-mode-untabify ()
(save-excursion
(goto-char (point-min))
(while (re-search-forward "[ \t]+$" nil t)
(delete-region (match-beginning 0) (match-end 0)))
(goto-char (point-min))
(if (search-forward "\t" nil t)
(untabify (1- (point)) (point-max))))
nil)
(add-hook 'java-mode-hook
'(lambda ()
(make-local-variable 'write-contents-hooks)
(add-hook 'write-contents-hooks 'java-mode-untabify)))
(set-background-color "honeydew")
;(set-face-font 'default "-bitstream-bitstream vera sans
mono-medium-r-normal-*-*-120-100-100-m-0-iso8859-16")
;(set-face-font 'default "-jmk-neep
alt-medium-r-*-*-20-*-*-*-c-*-iso8859-1")
;(set-face-font 'default "*courier-bold-r*140-100-100*")
(setq-default truncate-lines t)
(setq imap-log t)
(setq load-path (cons "/usr/bin" load-path))
;(load "rebview")
;(require 'rebol)
;(add-hook 'rebol-mode-hook (lambda () (font-lock-mode 1)))
;(setq auto-mode-alist
; (cons (cons "\\.r$" 'rebol-mode) auto-mode-alist))
;(load-file "/home/lat/emacros/emacros.elc")
;(global-set-key "\C-cA" 'emacros-name-last-kbd-macro-add)
;(global-set-key "\C-ce" 'emacros-execute-named-macro)
;(global-set-key "\C-cc" 'emacros-auto-execute-named-macro)
;; Display full path name if appropriate on mode line.
(add-hook 'find-file-hooks
'(lambda ()
(setq mode-line-buffer-identification 'buffer-file-truename)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; TRAMP settings
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(setq tramp-default-method "psftp")
(setq tramp-default-user "daysprin")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; GIT settings
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(load "/usr/share/doc/git-core/contrib/emacs/git.el" t)
(load "/usr/share/doc/git-core/contrib/emacs/git-blame.el" t)
(load "/usr/share/doc/git-core/contrib/emacs/vc-git.el" t)
(add-to-list 'vc-handled-backends 'GIT)
(defmacro elscreen-create-automatically (ad-do-it)
(` (if (not (elscreen-one-screen-p))
(, ad-do-it)
(elscreen-create)
(elscreen-notify-screen-modification 'force-immediately)
(elscreen-message "New screen is automatically created"))))
(defadvice elscreen-next (around elscreen-create-automatically activate)
(elscreen-create-automatically ad-do-it))
(defadvice elscreen-previous (around elscreen-create-automatically
activate)
(elscreen-create-automatically ad-do-it))
(defadvice elscreen-toggle (around elscreen-create-automatically activate)
(elscreen-create-automatically ad-do-it))
(defun elscreen-frame-title-update ()
(when (elscreen-screen-modified-p 'elscreen-frame-title-update)
(let* ((screen-list (sort (elscreen-get-screen-list) '<))
(screen-to-name-alist (elscreen-get-screen-to-name-alist))
(title (mapconcat
(lambda (screen)
(format "%d%s %s"
screen (elscreen-status-label screen)
(get-alist screen screen-to-name-alist)))
screen-list " ")))
(if (fboundp 'set-frame-name)
(set-frame-name title)
(setq frame-title-format title)))))
(eval-after-load "elscreen"
'(add-hook 'elscreen-screen-update-hook 'elscreen-frame-title-update))
(require 'executable)
;(let ((w3mmee (executable-find "w3mmee"))
; (mbconv (executable-find "mbconv")))
; (when (and w3mmee mbconv)
; (setq w3m-command w3mmee)))
;(require 'w3m)
;;---------------- Planner ---------------------------
(add-to-list 'load-path "~/elisp/muse/lisp")
(add-to-list 'load-path "~/elisp/planner")
(add-to-list 'load-path "~/elisp/remember")
(setq planner-project "WikiPlanner")
(setq muse-project-alist
'(("WikiPlanner"
("~/plans" ;; Or wherever you want your planner files to be
:default "index"
:major-mode planner-mode
:visit-link planner-visit-link))))
(require 'planner)
;;------------
(setq common-lisp-hyperspec-root "/home/lat/l/Lisp HyperSpec/")
;;-------------- "open file in the same window when clicking on it in
dired" by mnemonikk
;(defadvice dired-mouse-find-file-other-window (around
dired-mouse-find-file-advice activate)
; (flet ((find-file-other-window (filename) (find-file filename)))
; ad-do-it))
(defadvice dired-mouse-find-file-other-window (around
dired-mouse-find-file-advice activate)
(flet ((find-file-other-window (filename) (find-file filename))
(dired-other-window (filename) (dired filename)))
ad-do-it))
(global-visual-line-mode 1) ; 1 for on, 0 for off.
(global-linum-mode 1) ; always show line numbers
;;-------------------
;; highlight the current line; set a custom face, so we can
;; recognize from the normal marking (selection)
;(defface hl-line '((t (:background "Yellow")))
; "Face to use for `hl-line-face'." :group 'hl-line)
;(setq hl-line-face 'hl-line)
;(global-hl-line-mode t) ; turn it on for all modes by default
;;-------------------
;; Support functions for `stesla-rotate-buffers'. From the EmacsWiki.
(defvar stesla-hated-buffers '("KILL" "*Apropos*" "*Completions*" "*grep*"
".newsrc-dribble" ".bbdb" "sent-mail"
"*vc*"
"*Compile-Log*" "*Help*" "*Messages*"))
(defvar stesla-hated-buffer-regexps '("^ " "*Buffer" "^\\*trace"
"^\\*tramp"))
(setq iswitchb-buffer-ignore (append stesla-hated-buffer-regexps
stesla-hated-buffers))
(defmacro stesla-buffer-regexp-mapcar (regexp buffers)
"Find BUFFERS whose name matches REGEXP"
`(mapcar (lambda (this-buffer)
(if (string-match ,regexp (buffer-name this-buffer))
this-buffer))
,(if (symbolp buffers) (symbol-value buffers) buffers)))
(defmacro stesla-hated-buffer-from-regexps (regexps)
"Generate a one-dimensional list of buffers that match REGEXPS"
(append
'(append)
(mapcar (lambda (regexp)
`(delete nil (stesla-buffer-regexp-mapcar ,regexp
(buffer-list))))
(if (symbolp regexps) (symbol-value regexps) regexps))))
(defun stesla-delete-from-list (delete-these from-list)
"Delete DELETE-THESE from FROM-LIST."
(cond
((car delete-these)
(if (member (car delete-these) from-list)
(stesla-delete-from-list (cdr delete-these)
(delete (car delete-these) from-list))
(stesla-delete-from-list (cdr delete-these) from-list)))
(t from-list)))
(defun stesla-hated-buffers ()
"List of buffers I never want to see."
(delete nil
(append
(mapcar 'get-buffer stesla-hated-buffers)
(stesla-hated-buffer-from-regexps
stesla-hated-buffer-regexps))))
;; `stesla-rotate-buffers': Like `bury-buffer' but with the capability to
;; exclude certain specified buffers.
(defun stesla-rotate-buffers (&optional n)
"Switch to the Nth next buffer. Negative arguments move backwards."
(interactive)
(unless n
(setq n 1))
(let ((my-buffer-list
(stesla-delete-from-list (stesla-hated-buffers)
(buffer-list (selected-frame)))))
(switch-to-buffer
(if (< n 0)
(nth (+ (length my-buffer-list) n)
my-buffer-list)
(bury-buffer)
(nth n my-buffer-list)))))
;; Windows-style C-TAB and C-M-TAB to switch buffers.
(global-set-key (kbd "C-<tab>") 'stesla-rotate-buffers)
(global-set-key (kbd "C-M-<tab>") (lambda ()
(interactive)
(stesla-rotate-buffers -1)))
;; This is C-TAB and C-M-TAB for the Linux console. This requires special
;; setup; namely, you need to load a keymap file with /usr/bin/loadkeys
;; containing the following lines:
;;
;; control keycode 15 = Macro
;; control alt keycode 15 = Pause
;;
;; If you actually -have- a key that generates the Macro or Pause
keysyms, you
;; have a better keyboard than I. For me, this makes Emacs DWIW.
Credit for
;; this hack goes to Alex Schroeder.
(global-set-key (kbd "ESC [ M") 'stesla-rotate-buffers)
(global-set-key (kbd "ESC [ P") (lambda ()
(interactive)
(stesla-rotate-buffers -1)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; SLIME setup
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;(setq slime-lisp-implementations
; '((sbcl ("sbcl" "--core" "/usr/bin/sbcl"))))
;; possibly controversial as a global default, but shipping a lisp
;; that dies trying to talk to slime is stupid, so:
(set-language-environment "UTF-8")
(setq slime-net-coding-system 'utf-8-unix)
;; load slime:
(setq load-path (cons "/home/lat/clbuild/source/slime" load-path))
(setq load-path (cons "/home/lat/clbuild/source/slime/contrib" load-path))
(setq slime-backend "/home/lat/clbuild/.swank-loader.lisp")
(setq inhibit-splash-screen t)
(load "/home/lat/clbuild/source/slime/slime")
(setq inferior-lisp-program "/usr/local/bin/sbcl")
(setq slime-use-autodoc-mode nil)
(slime-setup '(slime-fancy slime-tramp slime-asdf))
(slime-require :swank-listener-hooks)
(define-key slime-mode-map (kbd "C-M-x") 'slime-eval-defun)
(setq slime-backend "/home/lat/clbuild/.swank-loader.lisp")
(setq inhibit-splash-screen t)
(load "/home/lat/clbuild/source/slime/slime")
(setq inferior-lisp-program "/usr/bin/sbcl")
(setq slime-use-autodoc-mode nil)
(slime-setup '(slime-fancy slime-tramp slime-asdf))
(slime-require :swank-listener-hooks)
(define-key slime-mode-map (kbd "C-M-x") 'slime-eval-defun)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; AUCTEX settings
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(load "auctex.el" nil t t)
(load "preview-latex.el" nil t t)
(setq TeX-PDF-mode t)
(defun pdfevince ()
(add-to-list 'TeX-output-view-style
(quote ("^pdf$" "." "evince %o %(outpage)")))
)
(add-hook 'LaTeX-mode-hook 'pdfevince t) ; AUCTeX LaTeX mode
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; erc --- irc client
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(add-to-list 'load-path "~/elisp/erc")
(require 'erc)
(setq erc-echo-notices-in-minibuffer-flag t)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Wanderlust
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; autoload configuration
;; (Not required if you have installed Wanderlust as XEmacs package)
(autoload 'wl "wl" "Wanderlust" t)
(autoload 'wl-other-frame "wl" "Wanderlust on new frame." t)
(autoload 'wl-draft "wl-draft" "Write draft with Wanderlust." t)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Misc.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(global-auto-revert-mode t)
(set-default-font "DejaVu Sans Mono-14")
(set-fontset-font (frame-parameter nil 'font)
'han '("cwTeXHeiBold" . "unicode-bmp"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; emacros
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(load-file "/home/lat/emacros/emacros.elc")
(global-set-key (kbd "<f5>") 'emacros-name-last-kbd-macro-add)
(global-set-key (kbd "C-M-x") 'slime-eval-defun)
(global-set-key "\C-cs" 'slime-selector)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Org-mode settings
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
(global-set-key "\C-cl" 'org-store-link)
(global-set-key "\C-ca" 'org-agenda)
(global-font-lock-mode 1)
(setq org-clock-persist t)
(setq org-clock-in-resume t)
(require 'org-clock)
(org-clock-persistence-insinuate)
;; (setq org-agenda-include-diary t)
(setq org-agenda-skip-scheduled-if-done t)
(setq org-agenda-skip-deadline-if-done t)
(setq org-agenda-skip-timestamp-if-done t)
(setq org-tag-alist '(("@malls-45" . ?m) ("@computers" . ?c)
("@hardware" . ?h) ("@gov" . ?g) ("@books" . ?b)))
;(org-remember-insinuate)
;(setq org-directory "~/org/")
;(setq org-default-notes-file (concat org-directory "/notes.org"))
;(define-key global-map "\C-cr" 'org-remember)
;(setq org-remember-templates
; '(("Journal" ?j "* %U %?\n\n %i\n %a" "~/org/journal.org"
;"Journal")))
;; popup alarm windows for org-mode -------------------
http://article.gmane.org/gmane.emacs.orgmode/5271
;; Add appointments from the diary to the agenda at startup and make
org-agenda-redo rescan the appt list:
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Org-mode latex export book class
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'org-latex)
(add-to-list 'org-export-latex-classes
'("book"
"\\documentclass[11pt,letter]{book}"
("\\part{%s}" . "\\part*{%s}")
("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")))
(setq load-path (cons "/home/lat/org-mode/lisp/org-taskjuggler.el"
load-path))
(add-to-list 'load-path "~/org-mode/lisp/")
(require 'org-taskjuggler)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Begin org-mode setting from norang
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(add-to-list 'load-path (expand-file-name "~/org-mode/lisp"))
(add-to-list 'auto-mode-alist '("\\.\\(org\\|org_archive\\|txt\\)$" .
org-mode))
(load-file "/home/lat/org-mode/lisp/org-capture.el")
(require 'org-install)
;;
;; Standard key bindings
(global-set-key "\C-cl" 'org-store-link)
(global-set-key "\C-ca" 'org-agenda)
(global-set-key "\C-cb" 'org-iswitchb)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Org-mode for gnus
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(setq message-mode-hook
(quote (orgstruct++-mode
(lambda nil (setq fill-column 72) (flyspell-mode 1))
turn-on-auto-fill
bbdb-define-all-aliases)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Enable yasnippet
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(add-to-list 'load-path
"~/.emacs.d/plugins")
(require 'yasnippet-bundle)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Enable flyspell-mode
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Make TAB the yas trigger key in the org-mode-hook and enable flyspell
mode and autofill
(add-hook 'org-mode-hook
(lambda ()
;; yasnippet
(make-variable-buffer-local 'yas/trigger-key)
(org-set-local 'yas/trigger-key [tab])
(define-key yas/keymap [tab] 'yas/next-field-group)
;; flyspell mode for spell checking everywhere
(flyspell-mode 1)
;; auto-fill mode on
(auto-fill-mode 1)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; agenda setup
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(setq org-agenda-files (quote ("~/org/refile.org"
"~/org.org"
"~/org/schedule.org"
"~/org/npa.org"
"~/org/anniv.org")))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Org-mode key bindings
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Custom Key Bindings
(global-set-key (kbd "<f12>") 'org-agenda)
(global-set-key (kbd "<f5>") 'bh/org-todo)
(global-set-key (kbd "<S-f5>") 'bh/widen)
(global-set-key (kbd "<f7>") 'set-truncate-lines)
(global-set-key (kbd "<f8>") 'org-cycle-agenda-files)
(global-set-key (kbd "<f9> b") 'bbdb)
(global-set-key (kbd "<f9> c") 'calendar)
(global-set-key (kbd "<f9> f") 'boxquote-insert-file)
(global-set-key (kbd "<f9> g") 'gnus)
(global-set-key (kbd "<f9> h") 'bh/hide-other)
(defun bh/hide-other ()
(interactive)
(save-excursion
(org-back-to-heading)
(org-shifttab)
(org-reveal)
(org-cycle)))
(global-set-key (kbd "<f9> i") 'bh/org-info)
(defun bh/org-info ()
(interactive)
(info "~/org-mode/doc/org.info"))
(global-set-key (kbd "<f9> I") 'bh/clock-in)
(global-set-key (kbd "<f9> O") 'bh/clock-out)
(global-set-key (kbd "<f9> r") 'boxquote-region)
(global-set-key (kbd "<f9> s") 'bh/go-to-scratch)
(defun bh/go-to-scratch ()
(interactive)
(switch-to-buffer "*scratch*")
(delete-other-windows))
(global-set-key (kbd "<f9> t") 'bh/insert-inactive-timestamp)
(global-set-key (kbd "<f9> u") 'bh/untabify)
(defun bh/untabify ()
(interactive)
(untabify (point-min) (point-max)))
(global-set-key (kbd "<f9> v") 'visible-mode)
(global-set-key (kbd "<f9> SPC") 'bh/clock-in-last-task)
(global-set-key (kbd "C-<f9>") 'previous-buffer)
(global-set-key (kbd "C-x n r") 'narrow-to-region)
(global-set-key (kbd "C-<f10>") 'next-buffer)
(global-set-key (kbd "<f11>") 'org-clock-goto)
(global-set-key (kbd "C-<f11>") 'org-clock-in)
(global-set-key (kbd "C-s-<f12>") 'bh/save-then-publish)
(global-set-key (kbd "M-<f11>") 'org-resolve-clocks)
(global-set-key (kbd "C-M-r") 'org-capture)
(global-set-key (kbd "M-<f9>") (lambda ()
(interactive)
(unless (buffer-modified-p)
(kill-buffer (current-buffer)))
(delete-frame)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; TODO keywords
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(setq org-todo-keywords '((sequence "TODO(t)" "|" "NEXT(n)" "|"
"DONE(d!)" "|" "CANC(n@)")
(sequence "lat(l)" "cgt(c)" "skt(s)" "kiy(k)"
"cet(e)" "lst(v)")))
(setq org-todo-keyword-faces
(quote (("TODO" :foreground "red" :weight bold)
("NEXT" :foreground "blue" :weight bold)
("DONE" :foreground "forest green" :weight bold)
("CANC" :foreground "forest green" :weight bold)
("WAITING" :foreground "yellow" :weight bold)
("SOMEDAY" :foreground "goldenrod" :weight bold))))
(setq org-use-fast-todo-selection t)
(setq org-treat-S-cursor-todo-selection-as-state-change nil)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Org Capture
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'org-macs)
;(setq org-default-notes-file (concat org-directory "~/org/notes.org"))
;(define-key global-map "\C-cc" 'org-capture)
(setq org-default-notes-file "~/org/refile.org")
;; I use C-M-r to start capture mode
(global-set-key (kbd "C-M-r") 'org-capture)
;; 3 capture templates for TODO tasks, Notes, and org-protocol (untested)
(setq org-capture-templates (quote (("t" "todo" entry (file
"~/org/refile.org") "* TODO %?
%U
%a" :clock-in t :clock-resume t)
("n" "note" entry (file
"~/org/refile.org") "*
%?
:NOTE:
%U
%a
:CLOCK:
:END:" :clock-in t :clock-resume t)
("w" "org-protocol" entry (file
"~/org/refile.org") "* TODO Review %c
%U" :immediate-finish t :clock-in t :clock-resume t))))
;; Remove empty CLOCK drawers on clock out
(defun bh/remove-empty-drawer-on-clock-out ()
(interactive)
(save-excursion
(beginning-of-line 0)
(org-remove-empty-drawer-at "CLOCK" (point))))
(add-hook 'org-clock-out-hook 'bh/remove-empty-drawer-on-clock-out 'append)
; Use IDO for target completion
(setq org-completion-use-ido t)
; Targets include this file and any file contributing to the agenda - up
to 5 levels deep
(setq org-refile-targets (quote ((org-agenda-files :maxlevel . 5) (nil
:maxlevel . 5))))
; Targets start with the file name - allows creating level 1 tasks
(setq org-refile-use-outline-path (quote file))
; Targets complete in steps so we start with filename, TAB shows the
next level of targets etc
(setq org-outline-path-complete-in-steps t)
; Allow refile to create parent tasks with confirmation
(setq org-refile-allow-creating-parent-nodes (quote confirm))
; Use IDO only for buffers
; set ido-mode to buffer and ido-everywhere to t via the customize interface
; '(ido-mode (quote both) nil (ido))
; '(ido-everywhere t)
Thanks again,
Lou
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 9:53 ` org-default-notes-file Louis Turk
@ 2010-10-18 10:03 ` Noorul Islam K M
2010-10-18 11:05 ` org-default-notes-file Louis Turk
2010-10-18 21:10 ` org-default-notes-file Sébastien Vauban
0 siblings, 2 replies; 19+ messages in thread
From: Noorul Islam K M @ 2010-10-18 10:03 UTC (permalink / raw)
To: Louis Turk; +Cc: emacs-orgmode
Louis Turk <lou@dayspringpublisher.com> writes:
> On 10/18/2010 05:20 PM, Noorul Islam K M wrote:
>> Louis Turk<lou@dayspringpublisher.com> writes:
>>
>>> On 10/18/2010 05:09 PM, Noorul Islam K M wrote:
>>>
>>>> Louis Turk<lou@dayspringpublisher.com> writes:
>>>>
>>>>> On 10/18/2010 03:16 PM, Noorul Islam K M wrote:
>>>>>
>>>>>> Louis Turk<lou@dayspringpublisher.com> writes:
>>>>>>
>>>>>>> Hi everyone,
>>>>>>>
>>>>>>> I trying to set up capture to use refile.org as the default notes file.
>>>>>>>
>>>>>>> lat-a-ws% locate refile.org
>>>>>>> /home/lat/org/refile.org
>>>>>>> lat-a-ws%
>>>>>>>
>>>>>>> (setq org-default-notes-file "~/org/refile.org")
>>>>>>>
>>>>>>> But I get:
>>>>>>>
>>>>>>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>>>>>>> (org-string-nw-p file)
>>>>>>> (or (org-string-nw-p file) org-default-notes-file (error "No notes
>>>>>>> file specified, and no default available"))
>>>>>>> (setq file (or (org-string-nw-p file) org-default-notes-file (error
>>>>>>> "No notes file specified, and no default available")))
>>>>>>> org-capture-target-buffer("~/org/refile.org")
>>>>>>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>>>>>>
>>>>>>> How do I fix this?
>>>>>>>
>>>>>> This function is defined in org-macs.el. I think you should have in your
>>>>>> .emacs.
>>>>>>
>>>>>> (require 'org-macs)
>>>>>>
>>>>>> Thanks and Regards
>>>>>> Noorul
>>>>> Thanks for responding, but that doesn't seem to cure the problem. I
>>>>> still get the same error message.
>>>>>
>>>> Which version of emacs and org-mode are you using?
>>>>
>>>> M-x emacs-version
>>>> M-x org-version
>>>>
>>>> Thanks and Regards
>>>> Noorul
>>> GNU Emacs 23.2.1 (x86_64-unknown-linux-gnu, GTK+ Version 2.20.0) of
>>> 2010-05-08 on pidsley.hoetzel.info
>>>
>>> Org-mode version 6.33x (release_7.01h.718.g0cb3c5.dirty)
>>>
>>> also, I'm using archlinux
>>>
>> I think you should use "Reply-To All" so that everyone in the list can
>> see your message and help out.
> Thanks. I didn't realize I wasn't replying to the list.
>> It looks like there is a collision of org-mode versions? Do you have
>> multiple org-mode installations?
> Not on purpose, but probably. I think I used git to get the latest
> org-mode.
>> I think 6.33x is the one that comes with emacs and release 7.01h is the
>> latest. Ensure that you have the latest version ahead in load path.
>>
>> Thanks and Regards
>> Noorul
> This is my .emacs, if that will help. Perhaps something in my .emacs
> is conflicting. It probably needs a lot of cleaning up.
>
> (custom-set-variables
> ;; custom-set-variables was added by Custom.
> ;; If you edit it by hand, you could mess it up, so be careful.
> ;; Your init file should contain only one such instance.
> ;; If there is more than one, they won't work right.
> '(canlock-password "129de665b1f8f1c95eaaa9daca897b054d323b2b")
> '(column-number-mode t)
> '(current-language-environment "UTF-8")
> '(debug-on-error t)
> '(muse-project-alist (quote (("WikiPlanner" ("~/plans" :default
> "index" :major-mode planner-mode :visit-link planner-visit-link)))))
> '(org-agenda-files (quote ("~/org/anniversaries.org"
> "~/org/schedule.org" "~/org/projects.org")))
> '(safe-local-variable-values (quote ((Package . CL-PPCRE) (Syntax
> . COMMON-LISP) (Package . CL-USER) (Base . 10))))
> '(save-place t nil (saveplace))
> '(scroll-bar-mode (quote right))
> '(show-paren-mode t)
> '(size-indication-mode t)
> '(uniquify-buffer-name-style (quote forward) nil (uniquify))
> '(vc-handled-backends (quote (Git SVN CVS RCS SCCS Arch))))
> (custom-set-faces
> ;; custom-set-faces was added by Custom.
> ;; If you edit it by hand, you could mess it up, so be careful.
> ;; Your init file should contain only one such instance.
> ;; If there is more than one, they won't work right.
> '(default ((t (:inherit nil :stipple nil :background "honeydew"
> :foreground "black" :inverse-video nil :box nil :strike-through nil
> :overline nil :underline nil :slant normal :weight normal :height 136
> :width normal :foundry "unknown" :family "Gentium")))))
> (global-set-key "\C-x\C-m" 'execute-extended-command)
> (global-set-key "\C-c\C-m" 'execute-extended-command)
> ;(setq custom-file "~/.emacs-custom.elc")
> ;(load custom-file)
> (setq inhibit-splash-screen '(t))
>
> (put 'downcase-region 'disabled nil)
> (put 'upcase-region 'disabled nil)
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Maltron keyboard navagation
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> ;; Moving down ----------------
> (global-set-key (kbd "s-k") 'next-line)
> (global-set-key (kbd "s-o") 'forward-char)
> (global-set-key (kbd "s-r") 'forward-word)
> (global-set-key (kbd "s-'") 'forward-sentence)
> (global-set-key (kbd "s-l") 'forward-paragraph)
> (global-set-key (kbd "s-z") 'forward-page)
> (global-set-key (kbd "s-x") 'end-of-buffer)
>
> ;; Moving up ---------------------
> (global-set-key (kbd "s-u") 'previous-line)
> (global-set-key (kbd "s-t") 'backward-char)
> (global-set-key (kbd "s-d") 'backward-word)
> (global-set-key (kbd "s-m") 'backward-sentence)
> (global-set-key (kbd "s-v") 'backward-paragraph)
> (global-set-key (kbd "s-w") 'backward-page)
> (global-set-key (kbd "s-;") 'beginning-of-buffer)
>
> ;; Move to middle ----------------
> (defun goto-middle-of-line ()
> (interactive)
> (let ((begin (progn (beginning-of-line) (point)))
> (end (progn (end-of-line) (point))))
> (goto-char (/ (+ begin end) 2))))
> (global-set-key (kbd "s-h") 'goto-middle-of-line)
>
> ;; Search forward
> (global-set-key (kbd "C-s-=") 'isearch-backward)
> (global-set-key (kbd "s-=") 'isearch-forward)
>
> ;; Move the contents of the buffer up or down without changing the
> cursor position ======
> (global-set-key (kbd "M-<down>") (lambda () (interactive) (scroll-up 1)))
> (global-set-key (kbd "M-<up>") (lambda () (interactive) (scroll-down 1)))
>
> ;; =====================================================
> (setq x-select-enable-clipboard t)
>
> (setq imap-log t)
>
> ;; I hate tabs!
> (setq-default indent-tabs-mode nil)
>
> ;; Remove tabs while saving.
> (defun java-mode-untabify ()
> (save-excursion
> (goto-char (point-min))
> (while (re-search-forward "[ \t]+$" nil t)
> (delete-region (match-beginning 0) (match-end 0)))
> (goto-char (point-min))
> (if (search-forward "\t" nil t)
> (untabify (1- (point)) (point-max))))
> nil)
>
> (add-hook 'java-mode-hook
> '(lambda ()
> (make-local-variable 'write-contents-hooks)
> (add-hook 'write-contents-hooks 'java-mode-untabify)))
>
>
> (set-background-color "honeydew")
>
> ;(set-face-font 'default "-bitstream-bitstream vera sans
> mono-medium-r-normal-*-*-120-100-100-m-0-iso8859-16")
> ;(set-face-font 'default "-jmk-neep
> alt-medium-r-*-*-20-*-*-*-c-*-iso8859-1")
> ;(set-face-font 'default "*courier-bold-r*140-100-100*")
>
> (setq-default truncate-lines t)
>
> (setq imap-log t)
>
> (setq load-path (cons "/usr/bin" load-path))
> ;(load "rebview")
> ;(require 'rebol)
> ;(add-hook 'rebol-mode-hook (lambda () (font-lock-mode 1)))
> ;(setq auto-mode-alist
> ; (cons (cons "\\.r$" 'rebol-mode) auto-mode-alist))
>
> ;(load-file "/home/lat/emacros/emacros.elc")
>
> ;(global-set-key "\C-cA" 'emacros-name-last-kbd-macro-add)
> ;(global-set-key "\C-ce" 'emacros-execute-named-macro)
> ;(global-set-key "\C-cc" 'emacros-auto-execute-named-macro)
>
> ;; Display full path name if appropriate on mode line.
> (add-hook 'find-file-hooks
> '(lambda ()
> (setq mode-line-buffer-identification 'buffer-file-truename)))
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; TRAMP settings
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (setq tramp-default-method "psftp")
> (setq tramp-default-user "daysprin")
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; GIT settings
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (load "/usr/share/doc/git-core/contrib/emacs/git.el" t)
> (load "/usr/share/doc/git-core/contrib/emacs/git-blame.el" t)
> (load "/usr/share/doc/git-core/contrib/emacs/vc-git.el" t)
> (add-to-list 'vc-handled-backends 'GIT)
>
>
> (defmacro elscreen-create-automatically (ad-do-it)
> (` (if (not (elscreen-one-screen-p))
> (, ad-do-it)
> (elscreen-create)
> (elscreen-notify-screen-modification 'force-immediately)
> (elscreen-message "New screen is automatically created"))))
>
> (defadvice elscreen-next (around elscreen-create-automatically activate)
> (elscreen-create-automatically ad-do-it))
>
> (defadvice elscreen-previous (around elscreen-create-automatically
> activate)
> (elscreen-create-automatically ad-do-it))
>
> (defadvice elscreen-toggle (around elscreen-create-automatically activate)
> (elscreen-create-automatically ad-do-it))
>
> (defun elscreen-frame-title-update ()
> (when (elscreen-screen-modified-p 'elscreen-frame-title-update)
> (let* ((screen-list (sort (elscreen-get-screen-list) '<))
> (screen-to-name-alist (elscreen-get-screen-to-name-alist))
> (title (mapconcat
> (lambda (screen)
> (format "%d%s %s"
> screen (elscreen-status-label screen)
> (get-alist screen screen-to-name-alist)))
> screen-list " ")))
> (if (fboundp 'set-frame-name)
> (set-frame-name title)
> (setq frame-title-format title)))))
>
> (eval-after-load "elscreen"
> '(add-hook 'elscreen-screen-update-hook 'elscreen-frame-title-update))
>
>
>
> (require 'executable)
>
> ;(let ((w3mmee (executable-find "w3mmee"))
> ; (mbconv (executable-find "mbconv")))
> ; (when (and w3mmee mbconv)
> ; (setq w3m-command w3mmee)))
>
> ;(require 'w3m)
>
>
> ;;---------------- Planner ---------------------------
>
> (add-to-list 'load-path "~/elisp/muse/lisp")
> (add-to-list 'load-path "~/elisp/planner")
> (add-to-list 'load-path "~/elisp/remember")
>
> (setq planner-project "WikiPlanner")
> (setq muse-project-alist
> '(("WikiPlanner"
> ("~/plans" ;; Or wherever you want your planner files to be
> :default "index"
> :major-mode planner-mode
> :visit-link planner-visit-link))))
> (require 'planner)
>
> ;;------------
>
> (setq common-lisp-hyperspec-root "/home/lat/l/Lisp HyperSpec/")
>
> ;;-------------- "open file in the same window when clicking on it in
> dired" by mnemonikk
>
> ;(defadvice dired-mouse-find-file-other-window (around
> dired-mouse-find-file-advice activate)
> ; (flet ((find-file-other-window (filename) (find-file filename)))
> ; ad-do-it))
>
> (defadvice dired-mouse-find-file-other-window (around
> dired-mouse-find-file-advice activate)
> (flet ((find-file-other-window (filename) (find-file filename))
> (dired-other-window (filename) (dired filename)))
> ad-do-it))
>
> (global-visual-line-mode 1) ; 1 for on, 0 for off.
> (global-linum-mode 1) ; always show line numbers
>
>
> ;;-------------------
> ;; highlight the current line; set a custom face, so we can
> ;; recognize from the normal marking (selection)
> ;(defface hl-line '((t (:background "Yellow")))
> ; "Face to use for `hl-line-face'." :group 'hl-line)
> ;(setq hl-line-face 'hl-line)
> ;(global-hl-line-mode t) ; turn it on for all modes by default
> ;;-------------------
>
> ;; Support functions for `stesla-rotate-buffers'. From the EmacsWiki.
>
> (defvar stesla-hated-buffers '("KILL" "*Apropos*" "*Completions*" "*grep*"
> ".newsrc-dribble" ".bbdb" "sent-mail"
> "*vc*"
> "*Compile-Log*" "*Help*" "*Messages*"))
>
> (defvar stesla-hated-buffer-regexps '("^ " "*Buffer" "^\\*trace"
> "^\\*tramp"))
>
> (setq iswitchb-buffer-ignore (append stesla-hated-buffer-regexps
> stesla-hated-buffers))
>
> (defmacro stesla-buffer-regexp-mapcar (regexp buffers)
> "Find BUFFERS whose name matches REGEXP"
> `(mapcar (lambda (this-buffer)
> (if (string-match ,regexp (buffer-name this-buffer))
> this-buffer))
> ,(if (symbolp buffers) (symbol-value buffers) buffers)))
>
> (defmacro stesla-hated-buffer-from-regexps (regexps)
> "Generate a one-dimensional list of buffers that match REGEXPS"
> (append
> '(append)
> (mapcar (lambda (regexp)
> `(delete nil (stesla-buffer-regexp-mapcar ,regexp
> (buffer-list))))
> (if (symbolp regexps) (symbol-value regexps) regexps))))
>
> (defun stesla-delete-from-list (delete-these from-list)
> "Delete DELETE-THESE from FROM-LIST."
> (cond
> ((car delete-these)
> (if (member (car delete-these) from-list)
> (stesla-delete-from-list (cdr delete-these)
> (delete (car delete-these) from-list))
> (stesla-delete-from-list (cdr delete-these) from-list)))
> (t from-list)))
>
> (defun stesla-hated-buffers ()
> "List of buffers I never want to see."
> (delete nil
> (append
> (mapcar 'get-buffer stesla-hated-buffers)
> (stesla-hated-buffer-from-regexps
> stesla-hated-buffer-regexps))))
>
> ;; `stesla-rotate-buffers': Like `bury-buffer' but with the capability to
> ;; exclude certain specified buffers.
>
> (defun stesla-rotate-buffers (&optional n)
> "Switch to the Nth next buffer. Negative arguments move backwards."
> (interactive)
> (unless n
> (setq n 1))
> (let ((my-buffer-list
> (stesla-delete-from-list (stesla-hated-buffers)
> (buffer-list (selected-frame)))))
> (switch-to-buffer
> (if (< n 0)
> (nth (+ (length my-buffer-list) n)
> my-buffer-list)
> (bury-buffer)
> (nth n my-buffer-list)))))
>
> ;; Windows-style C-TAB and C-M-TAB to switch buffers.
>
> (global-set-key (kbd "C-<tab>") 'stesla-rotate-buffers)
> (global-set-key (kbd "C-M-<tab>") (lambda ()
> (interactive)
> (stesla-rotate-buffers -1)))
>
> ;; This is C-TAB and C-M-TAB for the Linux console. This requires special
> ;; setup; namely, you need to load a keymap file with /usr/bin/loadkeys
> ;; containing the following lines:
> ;;
> ;; control keycode 15 = Macro
> ;; control alt keycode 15 = Pause
> ;;
> ;; If you actually -have- a key that generates the Macro or Pause
> keysyms, you
> ;; have a better keyboard than I. For me, this makes Emacs DWIW.
> Credit for
> ;; this hack goes to Alex Schroeder.
>
> (global-set-key (kbd "ESC [ M") 'stesla-rotate-buffers)
> (global-set-key (kbd "ESC [ P") (lambda ()
> (interactive)
> (stesla-rotate-buffers -1)))
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; SLIME setup
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> ;(setq slime-lisp-implementations
> ; '((sbcl ("sbcl" "--core" "/usr/bin/sbcl"))))
>
> ;; possibly controversial as a global default, but shipping a lisp
> ;; that dies trying to talk to slime is stupid, so:
> (set-language-environment "UTF-8")
> (setq slime-net-coding-system 'utf-8-unix)
>
> ;; load slime:
> (setq load-path (cons "/home/lat/clbuild/source/slime" load-path))
> (setq load-path (cons "/home/lat/clbuild/source/slime/contrib" load-path))
> (setq slime-backend "/home/lat/clbuild/.swank-loader.lisp")
> (setq inhibit-splash-screen t)
> (load "/home/lat/clbuild/source/slime/slime")
> (setq inferior-lisp-program "/usr/local/bin/sbcl")
> (setq slime-use-autodoc-mode nil)
> (slime-setup '(slime-fancy slime-tramp slime-asdf))
> (slime-require :swank-listener-hooks)
> (define-key slime-mode-map (kbd "C-M-x") 'slime-eval-defun)
>
> (setq slime-backend "/home/lat/clbuild/.swank-loader.lisp")
> (setq inhibit-splash-screen t)
> (load "/home/lat/clbuild/source/slime/slime")
> (setq inferior-lisp-program "/usr/bin/sbcl")
> (setq slime-use-autodoc-mode nil)
> (slime-setup '(slime-fancy slime-tramp slime-asdf))
> (slime-require :swank-listener-hooks)
> (define-key slime-mode-map (kbd "C-M-x") 'slime-eval-defun)
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; AUCTEX settings
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (load "auctex.el" nil t t)
> (load "preview-latex.el" nil t t)
>
> (setq TeX-PDF-mode t)
> (defun pdfevince ()
> (add-to-list 'TeX-output-view-style
> (quote ("^pdf$" "." "evince %o %(outpage)")))
> )
>
> (add-hook 'LaTeX-mode-hook 'pdfevince t) ; AUCTeX LaTeX mode
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; erc --- irc client
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (add-to-list 'load-path "~/elisp/erc")
> (require 'erc)
> (setq erc-echo-notices-in-minibuffer-flag t)
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Wanderlust
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> ;; autoload configuration
> ;; (Not required if you have installed Wanderlust as XEmacs package)
> (autoload 'wl "wl" "Wanderlust" t)
> (autoload 'wl-other-frame "wl" "Wanderlust on new frame." t)
> (autoload 'wl-draft "wl-draft" "Write draft with Wanderlust." t)
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Misc.
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (global-auto-revert-mode t)
>
> (set-default-font "DejaVu Sans Mono-14")
> (set-fontset-font (frame-parameter nil 'font)
> 'han '("cwTeXHeiBold" . "unicode-bmp"))
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; emacros
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (load-file "/home/lat/emacros/emacros.elc")
> (global-set-key (kbd "<f5>") 'emacros-name-last-kbd-macro-add)
> (global-set-key (kbd "C-M-x") 'slime-eval-defun)
> (global-set-key "\C-cs" 'slime-selector)
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Org-mode settings
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
> (global-set-key "\C-cl" 'org-store-link)
> (global-set-key "\C-ca" 'org-agenda)
> (global-font-lock-mode 1)
>
> (setq org-clock-persist t)
> (setq org-clock-in-resume t)
> (require 'org-clock)
> (org-clock-persistence-insinuate)
>
> ;; (setq org-agenda-include-diary t)
>
> (setq org-agenda-skip-scheduled-if-done t)
> (setq org-agenda-skip-deadline-if-done t)
> (setq org-agenda-skip-timestamp-if-done t)
>
> (setq org-tag-alist '(("@malls-45" . ?m) ("@computers" . ?c)
> ("@hardware" . ?h) ("@gov" . ?g) ("@books" . ?b)))
>
> ;(org-remember-insinuate)
> ;(setq org-directory "~/org/")
> ;(setq org-default-notes-file (concat org-directory "/notes.org"))
> ;(define-key global-map "\C-cr" 'org-remember)
> ;(setq org-remember-templates
> ; '(("Journal" ?j "* %U %?\n\n %i\n %a" "~/org/journal.org"
> ;"Journal")))
>
> ;; popup alarm windows for org-mode -------------------
> http://article.gmane.org/gmane.emacs.orgmode/5271
> ;; Add appointments from the diary to the agenda at startup and make
> org-agenda-redo rescan the appt list:
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Org-mode latex export book class
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (require 'org-latex)
>
> (add-to-list 'org-export-latex-classes
> '("book"
> "\\documentclass[11pt,letter]{book}"
> ("\\part{%s}" . "\\part*{%s}")
> ("\\chapter{%s}" . "\\chapter*{%s}")
> ("\\section{%s}" . "\\section*{%s}")
> ("\\subsection{%s}" . "\\subsection*{%s}")
> ("\\subsubsection{%s}" . "\\subsubsection*{%s}")))
>
> (setq load-path (cons "/home/lat/org-mode/lisp/org-taskjuggler.el"
> load-path))
> (add-to-list 'load-path "~/org-mode/lisp/")
> (require 'org-taskjuggler)
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Begin org-mode setting from norang
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (add-to-list 'load-path (expand-file-name "~/org-mode/lisp"))
> (add-to-list 'auto-mode-alist '("\\.\\(org\\|org_archive\\|txt\\)$"
> . org-mode))
>
> (load-file "/home/lat/org-mode/lisp/org-capture.el")
>
> (require 'org-install)
> ;;
> ;; Standard key bindings
> (global-set-key "\C-cl" 'org-store-link)
> (global-set-key "\C-ca" 'org-agenda)
> (global-set-key "\C-cb" 'org-iswitchb)
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Org-mode for gnus
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (setq message-mode-hook
> (quote (orgstruct++-mode
> (lambda nil (setq fill-column 72) (flyspell-mode 1))
> turn-on-auto-fill
> bbdb-define-all-aliases)))
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Enable yasnippet
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (add-to-list 'load-path
> "~/.emacs.d/plugins")
> (require 'yasnippet-bundle)
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Enable flyspell-mode
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> ;; Make TAB the yas trigger key in the org-mode-hook and enable
> flyspell mode and autofill
> (add-hook 'org-mode-hook
> (lambda ()
> ;; yasnippet
> (make-variable-buffer-local 'yas/trigger-key)
> (org-set-local 'yas/trigger-key [tab])
> (define-key yas/keymap [tab] 'yas/next-field-group)
> ;; flyspell mode for spell checking everywhere
> (flyspell-mode 1)
> ;; auto-fill mode on
> (auto-fill-mode 1)))
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; agenda setup
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (setq org-agenda-files (quote ("~/org/refile.org"
> "~/org.org"
> "~/org/schedule.org"
> "~/org/npa.org"
> "~/org/anniv.org")))
>
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Org-mode key bindings
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> ;; Custom Key Bindings
> (global-set-key (kbd "<f12>") 'org-agenda)
> (global-set-key (kbd "<f5>") 'bh/org-todo)
> (global-set-key (kbd "<S-f5>") 'bh/widen)
> (global-set-key (kbd "<f7>") 'set-truncate-lines)
> (global-set-key (kbd "<f8>") 'org-cycle-agenda-files)
> (global-set-key (kbd "<f9> b") 'bbdb)
> (global-set-key (kbd "<f9> c") 'calendar)
> (global-set-key (kbd "<f9> f") 'boxquote-insert-file)
> (global-set-key (kbd "<f9> g") 'gnus)
> (global-set-key (kbd "<f9> h") 'bh/hide-other)
>
> (defun bh/hide-other ()
> (interactive)
> (save-excursion
> (org-back-to-heading)
> (org-shifttab)
> (org-reveal)
> (org-cycle)))
>
> (global-set-key (kbd "<f9> i") 'bh/org-info)
>
> (defun bh/org-info ()
> (interactive)
> (info "~/org-mode/doc/org.info"))
>
> (global-set-key (kbd "<f9> I") 'bh/clock-in)
> (global-set-key (kbd "<f9> O") 'bh/clock-out)
> (global-set-key (kbd "<f9> r") 'boxquote-region)
> (global-set-key (kbd "<f9> s") 'bh/go-to-scratch)
>
> (defun bh/go-to-scratch ()
> (interactive)
> (switch-to-buffer "*scratch*")
> (delete-other-windows))
>
> (global-set-key (kbd "<f9> t") 'bh/insert-inactive-timestamp)
> (global-set-key (kbd "<f9> u") 'bh/untabify)
>
> (defun bh/untabify ()
> (interactive)
> (untabify (point-min) (point-max)))
>
> (global-set-key (kbd "<f9> v") 'visible-mode)
> (global-set-key (kbd "<f9> SPC") 'bh/clock-in-last-task)
> (global-set-key (kbd "C-<f9>") 'previous-buffer)
> (global-set-key (kbd "C-x n r") 'narrow-to-region)
> (global-set-key (kbd "C-<f10>") 'next-buffer)
> (global-set-key (kbd "<f11>") 'org-clock-goto)
> (global-set-key (kbd "C-<f11>") 'org-clock-in)
> (global-set-key (kbd "C-s-<f12>") 'bh/save-then-publish)
> (global-set-key (kbd "M-<f11>") 'org-resolve-clocks)
> (global-set-key (kbd "C-M-r") 'org-capture)
> (global-set-key (kbd "M-<f9>") (lambda ()
> (interactive)
> (unless (buffer-modified-p)
> (kill-buffer (current-buffer)))
> (delete-frame)))
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; TODO keywords
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (setq org-todo-keywords '((sequence "TODO(t)" "|" "NEXT(n)" "|"
> "DONE(d!)" "|" "CANC(n@)")
> (sequence "lat(l)" "cgt(c)" "skt(s)"
> "kiy(k)" "cet(e)" "lst(v)")))
>
> (setq org-todo-keyword-faces
> (quote (("TODO" :foreground "red" :weight bold)
> ("NEXT" :foreground "blue" :weight bold)
> ("DONE" :foreground "forest green" :weight bold)
> ("CANC" :foreground "forest green" :weight bold)
> ("WAITING" :foreground "yellow" :weight bold)
> ("SOMEDAY" :foreground "goldenrod" :weight bold))))
>
>
> (setq org-use-fast-todo-selection t)
> (setq org-treat-S-cursor-todo-selection-as-state-change nil)
>
>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ;;; Org Capture
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
>
> (require 'org-macs)
>
> ;(setq org-default-notes-file (concat org-directory "~/org/notes.org"))
> ;(define-key global-map "\C-cc" 'org-capture)
>
> (setq org-default-notes-file "~/org/refile.org")
>
> ;; I use C-M-r to start capture mode
> (global-set-key (kbd "C-M-r") 'org-capture)
>
> ;; 3 capture templates for TODO tasks, Notes, and org-protocol (untested)
> (setq org-capture-templates (quote (("t" "todo" entry (file
> "~/org/refile.org") "* TODO %?
> %U
> %a" :clock-in t :clock-resume t)
> ("n" "note" entry (file
> "~/org/refile.org") "* %?
> :NOTE:
> %U
> %a
> :CLOCK:
> :END:" :clock-in t :clock-resume t)
> ("w" "org-protocol" entry (file
> "~/org/refile.org") "* TODO Review %c
> %U" :immediate-finish t :clock-in t :clock-resume t))))
>
> ;; Remove empty CLOCK drawers on clock out
> (defun bh/remove-empty-drawer-on-clock-out ()
> (interactive)
> (save-excursion
> (beginning-of-line 0)
> (org-remove-empty-drawer-at "CLOCK" (point))))
>
> (add-hook 'org-clock-out-hook 'bh/remove-empty-drawer-on-clock-out 'append)
>
> ; Use IDO for target completion
> (setq org-completion-use-ido t)
>
> ; Targets include this file and any file contributing to the agenda -
> up to 5 levels deep
> (setq org-refile-targets (quote ((org-agenda-files :maxlevel . 5) (nil
> :maxlevel . 5))))
>
> ; Targets start with the file name - allows creating level 1 tasks
> (setq org-refile-use-outline-path (quote file))
>
> ; Targets complete in steps so we start with filename, TAB shows the
> next level of targets etc
> (setq org-outline-path-complete-in-steps t)
>
> ; Allow refile to create parent tasks with confirmation
> (setq org-refile-allow-creating-parent-nodes (quote confirm))
>
> ; Use IDO only for buffers
> ; set ido-mode to buffer and ido-everywhere to t via the customize interface
> ; '(ido-mode (quote both) nil (ido))
> ; '(ido-everywhere t)
>
> Thanks again,
> Lou
Can you move following line to the beginning for org-mode settings?
(add-to-list 'load-path "~/org-mode/lisp/")
Thanks and Regards
Noorul
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 10:03 ` org-default-notes-file Noorul Islam K M
@ 2010-10-18 11:05 ` Louis Turk
2010-10-18 11:17 ` org-default-notes-file Noorul Islam K M
2010-10-18 21:10 ` org-default-notes-file Sébastien Vauban
1 sibling, 1 reply; 19+ messages in thread
From: Louis Turk @ 2010-10-18 11:05 UTC (permalink / raw)
To: Noorul Islam K M; +Cc: emacs-orgmode
[-- Attachment #1.1: Type: text/plain, Size: 294 bytes --]
On 10/18/2010 06:03 PM, Noorul Islam K M wrote:
> Can you move following line to the beginning for org-mode settings?
>
> (add-to-list 'load-path "~/org-mode/lisp/")
>
> Thanks and Regards
> Noorul
Thanks, you are really trying hard to help me. But I still get the same
error message.
Lou
[-- Attachment #1.2: Type: text/html, Size: 781 bytes --]
[-- Attachment #2: Type: text/plain, Size: 201 bytes --]
_______________________________________________
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
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 9:39 ` org-default-notes-file Andreas Röhler
@ 2010-10-18 11:10 ` Louis Turk
2010-10-18 11:54 ` org-default-notes-file Andreas Röhler
0 siblings, 1 reply; 19+ messages in thread
From: Louis Turk @ 2010-10-18 11:10 UTC (permalink / raw)
To: Andreas Röhler; +Cc: emacs-orgmode, Noorul Islam K M
On 10/18/2010 05:39 PM, Andreas Röhler wrote:
> Am 18.10.2010 11:02, schrieb Noorul Islam K M:
>> Andreas Röhler<andreas.roehler@easy-emacs.de> writes:
>>
>>> Am 18.10.2010 09:16, schrieb Noorul Islam K M:
>>>
>>>> Louis Turk<lou@dayspringpublisher.com> writes:
>>>>
>>>>> Hi everyone,
>>>>>
>>>>> I trying to set up capture to use refile.org as the default notes
>>>>> file.
>>>>>
>>>>> lat-a-ws% locate refile.org
>>>>> /home/lat/org/refile.org
>>>>> lat-a-ws%
>>>>>
>>>>> (setq org-default-notes-file "~/org/refile.org")
>>>>>
>>>>> But I get:
>>>>>
>>>>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>>>>> (org-string-nw-p file)
>>>>> (or (org-string-nw-p file) org-default-notes-file (error "No
>>>>> notes
>>>>> file specified, and no default available"))
>>>>> (setq file (or (org-string-nw-p file) org-default-notes-file
>>>>> (error
>>>>> "No notes file specified, and no default available")))
>>>>> org-capture-target-buffer("~/org/refile.org")
>>>>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>>>>
>>>>> How do I fix this?
>>>>>
>>>>
>>>> This function is defined in org-macs.el. I think you should have in
>>>> your
>>>> .emacs.
>>>>
>>>> (require 'org-macs)
>>>>
>>>> Thanks and Regards
>>>> Noorul
>>>>
>>>
>>> Hi Noorul,
>>>
>>> would this not indicate a bug anyway?
>>> IMHO functions needed should be available, if org-mode is activated.
>>>
>>> BTW at my machine org-string-nw-p is defined in the git-repo only, not
>>> in the installed org-macs.el.
>>>
>>> HTH
>>>
>>
>> Strange that org-string-nw-p is not there in org-macs.el.
>
> Seems not that strange for me.
>
> git blame says,
>
> org-mobile.el, where it's defined, started 2009-09-15
>
> So vendors might not have it, it's not distributed yet maybe.
>
> If distributed, (require 'org-macs)
> isn't needed BTW, because org.el already requires it then.
>
> So my recommendation is just to load the git-version:
>
> git clone git://repo.or.cz/org-mode.git
>
> Andreas
Andreas,
Thanks for replying.
I updated using
lat-a-ws% git clone git://repo.or.cz/org-mode.git
but I still get the same error message.
Lou
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 11:05 ` org-default-notes-file Louis Turk
@ 2010-10-18 11:17 ` Noorul Islam K M
2010-10-18 11:36 ` org-default-notes-file Louis Turk
0 siblings, 1 reply; 19+ messages in thread
From: Noorul Islam K M @ 2010-10-18 11:17 UTC (permalink / raw)
To: Louis Turk; +Cc: emacs-orgmode
Louis Turk <lou@dayspringpublisher.com> writes:
> On 10/18/2010 06:03 PM, Noorul Islam K M wrote:
>
>> Can you move following line to the beginning for org-mode settings?
>>
>> (add-to-list 'load-path "~/org-mode/lisp/")
>>
>> Thanks and Regards
>> Noorul
>
> Thanks, you are really trying hard to help me. But I still get the
> same error message.
>
Try to find out which version of org-mode is actually loaded. May be you
can use M-x find-library org to find which org.el is loaded.
Thanks and Regards
Noorul
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 11:17 ` org-default-notes-file Noorul Islam K M
@ 2010-10-18 11:36 ` Louis Turk
2010-10-18 17:28 ` org-default-notes-file Eric S Fraga
0 siblings, 1 reply; 19+ messages in thread
From: Louis Turk @ 2010-10-18 11:36 UTC (permalink / raw)
To: Noorul Islam K M; +Cc: emacs-orgmode
On 10/18/2010 07:17 PM, Noorul Islam K M wrote:
> Louis Turk<lou@dayspringpublisher.com> writes:
>
>> On 10/18/2010 06:03 PM, Noorul Islam K M wrote:
>>
>>> Can you move following line to the beginning for org-mode settings?
>>>
>>> (add-to-list 'load-path "~/org-mode/lisp/")
>>>
>>> Thanks and Regards
>>> Noorul
>> Thanks, you are really trying hard to help me. But I still get the
>> same error message.
>>
> Try to find out which version of org-mode is actually loaded. May be you
> can use M-x find-library org to find which org.el is loaded.
>
> Thanks and Regards
> Noorul
That loaded ~/org-mode/lisp/org.el
Louis
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 11:10 ` org-default-notes-file Louis Turk
@ 2010-10-18 11:54 ` Andreas Röhler
2010-10-18 18:16 ` org-default-notes-file David Maus
0 siblings, 1 reply; 19+ messages in thread
From: Andreas Röhler @ 2010-10-18 11:54 UTC (permalink / raw)
To: Louis Turk; +Cc: emacs-orgmode, Noorul Islam K M, Carsten Dominik
Am 18.10.2010 13:10, schrieb Louis Turk:
> On 10/18/2010 05:39 PM, Andreas Röhler wrote:
>> Am 18.10.2010 11:02, schrieb Noorul Islam K M:
>>> Andreas Röhler<andreas.roehler@easy-emacs.de> writes:
>>>
>>>> Am 18.10.2010 09:16, schrieb Noorul Islam K M:
>>>>
>>>>> Louis Turk<lou@dayspringpublisher.com> writes:
>>>>>
>>>>>> Hi everyone,
>>>>>>
>>>>>> I trying to set up capture to use refile.org as the default notes
>>>>>> file.
>>>>>>
>>>>>> lat-a-ws% locate refile.org
>>>>>> /home/lat/org/refile.org
>>>>>> lat-a-ws%
>>>>>>
>>>>>> (setq org-default-notes-file "~/org/refile.org")
>>>>>>
>>>>>> But I get:
>>>>>>
>>>>>> Debugger entered--Lisp error: (void-function org-string-nw-p)
>>>>>> (org-string-nw-p file)
>>>>>> (or (org-string-nw-p file) org-default-notes-file (error "No notes
>>>>>> file specified, and no default available"))
>>>>>> (setq file (or (org-string-nw-p file) org-default-notes-file (error
>>>>>> "No notes file specified, and no default available")))
>>>>>> org-capture-target-buffer("~/org/refile.org")
>>>>>> (set-buffer (org-capture-target-buffer (nth 1 target)))
>>>>>>
>>>>>> How do I fix this?
>>>>>>
>>>>>
>>>>> This function is defined in org-macs.el. I think you should have in
>>>>> your
>>>>> .emacs.
>>>>>
>>>>> (require 'org-macs)
>>>>>
>>>>> Thanks and Regards
>>>>> Noorul
>>>>>
>>>>
>>>> Hi Noorul,
>>>>
>>>> would this not indicate a bug anyway?
>>>> IMHO functions needed should be available, if org-mode is activated.
>>>>
>>>> BTW at my machine org-string-nw-p is defined in the git-repo only, not
>>>> in the installed org-macs.el.
>>>>
>>>> HTH
>>>>
>>>
>>> Strange that org-string-nw-p is not there in org-macs.el.
>>
>> Seems not that strange for me.
>>
>> git blame says,
>>
>> org-mobile.el, where it's defined, started 2009-09-15
>>
>> So vendors might not have it, it's not distributed yet maybe.
>>
>> If distributed, (require 'org-macs)
>> isn't needed BTW, because org.el already requires it then.
>>
>> So my recommendation is just to load the git-version:
>>
>> git clone git://repo.or.cz/org-mode.git
>>
>> Andreas
> Andreas,
>
> Thanks for replying.
>
> I updated using
>
> lat-a-ws% git clone git://repo.or.cz/org-mode.git
>
> but I still get the same error message.
>
> Lou
>
>
>
>
>
Hi Lou,
same here unfortunatly.
load-path displays the git-org repo, org-mode is loaded from there.
(require 'org-macs) is present there but
org-string-nw-p still unknown.
Hm, no idea ...
I'll drop Carsten a cc, maybe he knows what to do.
Andreas
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: Re: org-default-notes-file
2010-10-18 11:36 ` org-default-notes-file Louis Turk
@ 2010-10-18 17:28 ` Eric S Fraga
0 siblings, 0 replies; 19+ messages in thread
From: Eric S Fraga @ 2010-10-18 17:28 UTC (permalink / raw)
To: Louis Turk; +Cc: emacs-orgmode, Noorul Islam K M
On Mon, 18 Oct 2010 19:36:18 +0800, Louis Turk <lou@dayspringpublisher.com> wrote:
>
> On 10/18/2010 07:17 PM, Noorul Islam K M wrote:
> > Louis Turk<lou@dayspringpublisher.com> writes:
> >
> >> On 10/18/2010 06:03 PM, Noorul Islam K M wrote:
> >>
> >>> Can you move following line to the beginning for org-mode settings?
> >>>
> >>> (add-to-list 'load-path "~/org-mode/lisp/")
> >>>
> >>> Thanks and Regards
> >>> Noorul
> >> Thanks, you are really trying hard to help me. But I still get the
> >> same error message.
yes but did you move it to the right place? further, you should also
move the (require 'org-install) to come before anything else, but
after the load-path setting.
I have the following at the start of my org customisations:
: (add-to-list 'load-path "~/git/org-mode/lisp")
: (require 'org-install)
After making the changes, check org-version again. Are you still
getting 6.33 or are you now in 7.01xxx?
I should also add that I set my default org notes file to a file name
without a path but define org-directory to point to the appropriate
directory:
: (setq org-directory "~/git/notes"
: org-default-notes-file "notes.org")
HTH,
eric
--
Eric S Fraga
GnuPG: 8F5C 279D 3907 E14A 5C29 570D C891 93D8 FFFC F67D
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: Re: org-default-notes-file
2010-10-18 11:54 ` org-default-notes-file Andreas Röhler
@ 2010-10-18 18:16 ` David Maus
2010-10-18 18:59 ` Andreas Röhler
2010-10-18 19:18 ` Andreas Röhler
0 siblings, 2 replies; 19+ messages in thread
From: David Maus @ 2010-10-18 18:16 UTC (permalink / raw)
To: Andreas Röhler; +Cc: emacs-orgmode, Noorul Islam K M, Carsten Dominik
[-- Attachment #1.1: Type: text/plain, Size: 838 bytes --]
At Mon, 18 Oct 2010 13:54:30 +0200,
Andreas Röhler wrote:
>
> same here unfortunatly.
> load-path displays the git-org repo, org-mode is loaded from there.
>
> (require 'org-macs) is present there but
> org-string-nw-p still unknown.
>
The only explanation that makes sense to me is a mixup of old and new
Org files: org-string-nw-p is a regular function and org-macs is
required by org.el
It was added Tue Jul 20 07:54:11 2010 +0200 -- do you have a function:
org-not-nil
(C-h f org-not-nil RET)
and, say, org-plist-delete
(C-h f org-plist-delete RET)
If so, the help shows the file where the function is defined. Can you
verify that this is the file in the clone of the git repository?
Best,
-- David
--
OpenPGP... 0x99ADB83B5A4478E6
Jabber.... dmjena@jabber.org
Email..... dmaus@ictsoc.de
[-- Attachment #1.2: Type: application/pgp-signature, Size: 230 bytes --]
[-- Attachment #2: Type: text/plain, Size: 201 bytes --]
_______________________________________________
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
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: Re: org-default-notes-file
2010-10-18 18:16 ` org-default-notes-file David Maus
@ 2010-10-18 18:59 ` Andreas Röhler
2010-10-18 19:18 ` Andreas Röhler
1 sibling, 0 replies; 19+ messages in thread
From: Andreas Röhler @ 2010-10-18 18:59 UTC (permalink / raw)
To: David Maus; +Cc: emacs-orgmode, Noorul Islam K M, Carsten Dominik
[-- Attachment #1: Type: text/plain, Size: 22235 bytes --]
Am 18.10.2010 20:16, schrieb David Maus:
> At Mon, 18 Oct 2010 13:54:30 +0200,
> Andreas Röhler wrote:
>>
>> same here unfortunatly.
>> load-path displays the git-org repo, org-mode is loaded from there.
>>
>> (require 'org-macs) is present there but
>> org-string-nw-p still unknown.
>>
>
> The only explanation that makes sense to me is a mixup of old and new
> Org files: org-string-nw-p is a regular function and org-macs is
> required by org.el
>
> It was added Tue Jul 20 07:54:11 2010 +0200 -- do you have a function:
>
> org-not-nil
> (C-h f org-not-nil RET)
>
> and, say, org-plist-delete
> (C-h f org-plist-delete RET)
Both a not known, while org-mode from the very file is, see screenshot.
loading the git-version mode I use the following:
(defun org-mode-einrichtungen ()
(interactive)
;; (unload-feature 'org-mode)
(add-to-list 'load-path "~/org-mode/lisp/")
(load "~/org-mode/lisp/org.el"))
Also I send the output of M-x describe-mode (there are some self-made
functions, which didn't disturb other actions noticably)
Thanks
Andreas
Enabled minor modes: Abbrev Auto-composition
Auto-compression Auto-encryption Auto-image-file
Blink-cursor File-name-shadow Font-lock
Global-auto-composition Global-font-lock Iswitchb
Line-number Menu-bar Mouse-wheel My-keys Pointback
Savehist Show-paren Tooltip Transient-mark Yas/Global
Yas/Minor
(Information about these minor modes follows the major mode info.)
Org mode:
Outline-based notes management and organizer, alias
"Carsten's outline-mode for keeping track of everything."
Org-mode develops organizational tasks around a NOTES file which
contains information about projects as plain text. Org-mode is
implemented on top of outline-mode, which is ideal to keep the content
of large files well structured. It supports ToDo items, deadlines and
time stamps, which magically appear in the diary listing of the Emacs
calendar. Tables are easily created with a built-in table editor.
Plain text URL-like links connect to websites, emails (VM), Usenet
messages (Gnus), BBDB entries, and any files related to the project.
For printing and sharing of notes, an Org-mode file (or a part of it)
can be exported as a structured ASCII or HTML file.
The following commands are available:
key binding
--- -------
C-a org-beginning-of-line
C-b zweizeilig
C-c Prefix Command
C-e org-end-of-line
TAB org-cycle
C-j org-return-indent
C-k org-kill-line
RET org-return
C-y org-yank
ESC Prefix Command
| org-force-self-insert
s-a ar-highlight-changes-mode-zuruecksetzen
s-c Prefix Command
s-f fill-buffer
s-h highlight-changes-mode-zuruecksetzen
s-o ar-word-atpt
s-r an-fa-reg
s-w an-fa-wort-ersetz
C-# org-table-rotate-recalc-marks
C-' org-cycle-agenda-files
C-, org-cycle-agenda-files
<C-S-left> org-shiftcontrolleft
<C-S-return> org-insert-todo-heading-respect-content
<C-S-right> org-shiftcontrolright
<C-return> org-insert-heading-respect-content
<C-tab> org-force-cycle-archived
<M-S-down> org-shiftmetadown
<M-S-left> org-shiftmetaleft
<M-S-return> org-insert-todo-heading
<M-S-right> org-shiftmetaright
<M-S-up> org-shiftmetaup
<M-down> org-metadown
<M-left> org-metaleft
<M-return> org-meta-return
<M-right> org-metaright
<M-tab> org-complete
<M-up> org-metaup
<S-down> org-shiftdown
<S-iso-lefttab> org-shifttab
<S-left> org-shiftleft
<S-return> org-table-copy-down
<S-right> org-shiftright
<S-tab> org-shifttab
<S-up> org-shiftup
<backtab> org-shifttab
<end> org-end-of-line
<home> org-beginning-of-line
<remap> Prefix Command
<tab> org-cycle
<remap> <delete-backward-char> org-delete-backward-char
<remap> <delete-char> org-delete-char
<remap> <self-insert-command> org-self-insert-command
M-TAB org-complete
M-RET org-insert-heading
M-# zu-naechster-ueberschrift
M-a org-backward-sentence
M-e org-forward-sentence
C-c C-a org-attach
C-c C-b org-backward-same-level
C-c C-c org-ctrl-c-ctrl-c
C-c C-d org-deadline
C-c C-e org-export
C-c C-f org-forward-same-level
C-c TAB show-children
C-c C-j org-goto
C-c C-k org-kill-note-or-show-branches
C-c C-l org-insert-link
C-c RET org-ctrl-c-ret
C-c C-n outline-next-visible-heading
C-c C-o org-open-at-point
C-c C-p outline-previous-visible-heading
C-c C-q org-set-tags-command
C-c C-r org-reveal
C-c C-s org-schedule
C-c C-t org-todo
C-c C-u outline-up-heading
C-c C-v Prefix Command
C-c C-w org-refile
C-c C-x Prefix Command
C-c C-y org-evaluate-time-range
C-c C-z org-add-note
C-c C-^ outline-move-subtree-up
C-c SPC org-table-blank-field
C-c ! org-time-stamp-inactive
C-c # org-update-statistics-cookies
C-c $ org-archive-subtree
C-c % org-mark-ring-push
C-c & org-mark-ring-goto
(that binding is currently shadowed by another mode)
C-c ' org-edit-special
C-c * org-ctrl-c-star
C-c + org-table-sum
C-c , org-priority
C-c - org-ctrl-c-minus
C-c . org-time-stamp
C-c / org-sparse-tree
C-c : org-toggle-fixed-width-section
C-c ; org-toggle-comment
C-c < org-date-from-calendar
C-c = org-table-eval-formula
C-c > org-goto-calendar
C-c ? org-table-field-info
C-c @ outline-mark-subtree
C-c [ org-agenda-file-to-front
C-c \ org-match-sparse-tree
C-c ] org-remove-file
C-c ^ org-sort
C-c ` org-table-edit-field
C-c b fa-wort-beg-end
C-c c fa-eval-ersetz
C-c o fa-scann-korr
C-c r fa-any-reg-ersetz
C-c s fa-reg-ersetz
C-c w fa-wort-ersetz
C-c z fa-zeichen-ersetz
C-c { org-table-toggle-formula-debugger
C-c | org-table-create-or-convert-from-region
C-c } org-table-toggle-coordinate-overlays
C-c ~ org-table-create-with-table.el
C-c C-* org-list-make-subtree
C-c C-< outline-promote
C-c C-> outline-demote
C-c <C-down> fa-reg-left-nonstrict
C-c <C-left> fa-wort-left-nonstrict
C-c <C-right> fa-wort-right-nonstrict
C-c <C-up> fa-reg-right-nonstrict
C-c C-a show-all
(that binding is currently shadowed by another mode)
C-c C-b outline-backward-same-level
(that binding is currently shadowed by another mode)
C-c C-c hide-entry
(that binding is currently shadowed by another mode)
C-c C-d hide-subtree
(that binding is currently shadowed by another mode)
C-c C-e show-entry
(that binding is currently shadowed by another mode)
C-c C-f outline-forward-same-level
(that binding is currently shadowed by another mode)
C-c C-k show-branches
(that binding is currently shadowed by another mode)
C-c C-l hide-leaves
(that binding is currently shadowed by another mode)
C-c RET outline-insert-heading
(that binding is currently shadowed by another mode)
C-c C-o hide-other
(that binding is currently shadowed by another mode)
C-c C-q hide-sublevels
(that binding is currently shadowed by another mode)
C-c C-s show-subtree
(that binding is currently shadowed by another mode)
C-c C-t hide-body
(that binding is currently shadowed by another mode)
C-c C-v outline-move-subtree-down
(that binding is currently shadowed by another mode)
C-c + zu-naechster-ueberschrift
(that binding is currently shadowed by another mode)
s-c b an-fa-reg-beg-end-ersetzliste
M-TAB ispell-complete-word
(that binding is currently shadowed by another mode)
C-c C-v C-a org-babel-sha1-hash
C-c C-v C-b org-babel-execute-buffer
C-c C-v C-d org-babel-demarcate-block
C-c C-v C-e org-babel-execute-maybe
C-c C-v C-f org-babel-tangle-file
C-c C-v TAB org-babel-lob-ingest
C-c C-v C-l org-babel-load-in-session
C-c C-v C-n org-babel-next-src-block
C-c C-v C-o org-babel-open-src-block-result
C-c C-v C-p org-babel-previous-src-block
C-c C-v C-r org-babel-goto-named-result
C-c C-v C-s org-babel-execute-subtree
C-c C-v C-t org-babel-tangle
C-c C-v C-u org-babel-goto-src-block-head
C-c C-v C-v org-babel-expand-src-block
C-c C-v C-x org-babel-do-key-sequence-in-edit-buffer
C-c C-v C-z org-babel-switch-to-session
C-c C-v a org-babel-sha1-hash
C-c C-v b org-babel-execute-buffer
C-c C-v d org-babel-demarcate-block
C-c C-v e org-babel-execute-maybe
C-c C-v f org-babel-tangle-file
C-c C-v g org-babel-goto-named-src-block
C-c C-v h org-babel-describe-bindings
C-c C-v i org-babel-lob-ingest
C-c C-v l org-babel-load-in-session
C-c C-v n org-babel-next-src-block
C-c C-v o org-babel-open-src-block-result
C-c C-v p org-babel-previous-src-block
C-c C-v r org-babel-goto-named-result
C-c C-v s org-babel-execute-subtree
C-c C-v t org-babel-tangle
C-c C-v u org-babel-goto-src-block-head
C-c C-v v org-babel-expand-src-block
C-c C-v x org-babel-do-key-sequence-in-edit-buffer
C-c C-v z org-babel-switch-to-session-with-code
C-c C-x C-a org-archive-subtree-default
C-c C-x C-b org-toggle-checkbox
C-c C-x C-c org-columns
C-c C-x C-d org-clock-display
C-c C-x C-f org-emphasize
C-c C-x TAB org-clock-in
C-c C-x C-j org-clock-goto
C-c C-x C-k org-mark-entry-for-agenda-action
C-c C-x C-l org-preview-latex-fragment
C-c C-x RET Prefix Command
C-c C-x C-n org-next-link
C-c C-x C-o org-clock-out
C-c C-x C-p org-previous-link
C-c C-x C-r org-clock-report
C-c C-x C-s org-advertized-archive-subtree
C-c C-x C-t org-toggle-time-stamp-overlays
C-c C-x C-u org-dblock-update
C-c C-x C-v org-toggle-inline-images
C-c C-x C-w org-cut-special
C-c C-x C-x org-clock-cancel
C-c C-x C-y org-paste-special
C-c C-x ESC Prefix Command
C-c C-x ! org-reload
C-c C-x , org-timer-pause-or-continue
C-c C-x - org-timer-item
C-c C-x . org-timer
C-c C-x 0 org-timer-start
C-c C-x : org-timer-cancel-timer
C-c C-x ; org-timer-set-timer
C-c C-x < org-agenda-set-restriction-lock
C-c C-x > org-agenda-remove-restriction-lock
C-c C-x A org-archive-to-archive-sibling
C-c C-x G org-feed-goto-inbox
C-c C-x [ org-reftex-citation
C-c C-x \ org-toggle-pretty-entities
C-c C-x _ org-timer-stop
C-c C-x a org-toggle-archive-tag
C-c C-x b org-tree-to-indirect-buffer
C-c C-x c org-clone-subtree-with-time-shift
C-c C-x e org-set-effort
C-c C-x f org-footnote-action
C-c C-x g org-feed-update-all
C-c C-x i org-insert-columns-dblock
C-c C-x o org-toggle-ordered-property
C-c C-x p org-set-property
C-c C-x M-w org-copy-special
C-c C-x RET g org-mobile-pull
C-c C-x RET p org-mobile-push
In addition to any hooks its parent mode `outline-mode' might have run,
this mode runs the hook `org-mode-hook', as the final step
during initialization.
\f
Abbrev minor mode (indicator Abbrev):
Toggle Abbrev mode in the current buffer.
With optional argument ARG, turn abbrev mode on if ARG is
positive, otherwise turn it off. In Abbrev mode, inserting an
abbreviation causes it to expand and be replaced by its expansion.
\f
Auto-composition minor mode (no indicator):
Toggle Auto Composition mode.
With ARG, turn Auto Composition mode off if and only if ARG is a
non-positive
number; if ARG is nil, toggle Auto Composition mode; anything else turns
Auto
Composition on.
When Auto Composition is enabled, text characters are automatically composed
by functions registered in `composition-function-table' (which see).
You can use `global-auto-composition-mode' to turn on
Auto Composition mode in all buffers (this is the default).
\f
Auto-compression minor mode (no indicator):
Toggle automatic file compression and uncompression.
With prefix argument ARG, turn auto compression on if positive, else off.
Return the new status of auto compression (non-nil means on).
\f
Auto-encryption minor mode (no indicator):
Toggle automatic file encryption and decryption.
With prefix argument ARG, turn auto encryption on if positive, else off.
Return the new status of auto encryption (non-nil means on).
\f
Auto-image-file minor mode (no indicator):
Toggle visiting of image files as images.
With prefix argument ARG, turn on if positive, otherwise off.
Returns non-nil if the new state is enabled.
Image files are those whose name has an extension in
`image-file-name-extensions', or matches a regexp in
`image-file-name-regexps'.
(fn &optional ARG)
\f
Blink-cursor minor mode (no indicator):
Toggle blinking cursor mode.
With a numeric argument, turn blinking cursor mode on if ARG is positive,
otherwise turn it off. When blinking cursor mode is enabled, the
cursor of the selected window blinks.
Note that this command is effective only when Emacs
displays through a window system, because then Emacs does its own
cursor display. On a text-only terminal, this is not implemented.
\f
File-name-shadow minor mode (no indicator):
Toggle File-Name Shadow mode.
When active, any part of a filename being read in the minibuffer
that would be ignored (because the result is passed through
`substitute-in-file-name') is given the properties in
`file-name-shadow-properties', which can be used to make
that portion dim, invisible, or otherwise less visually noticeable.
With prefix argument ARG, turn on if positive, otherwise off.
Returns non-nil if the new state is enabled.
\f
Font-lock minor mode (no indicator):
Toggle Font Lock mode.
With arg, turn Font Lock mode off if and only if arg is a non-positive
number; if arg is nil, toggle Font Lock mode; anything else turns Font
Lock on.
(Font Lock is also known as "syntax highlighting".)
When Font Lock mode is enabled, text is fontified as you type it:
- Comments are displayed in `font-lock-comment-face';
- Strings are displayed in `font-lock-string-face';
- Certain other expressions are displayed in other faces according to the
value of the variable `font-lock-keywords'.
To customize the faces (colors, fonts, etc.) used by Font Lock for
fontifying different parts of buffer text, use M-x customize-face.
You can enable Font Lock mode in any major mode automatically by turning
on in
the major mode's hook. For example, put in your ~/.emacs:
(add-hook 'c-mode-hook 'turn-on-font-lock)
Alternatively, you can use Global Font Lock mode to automagically turn
on Font
Lock mode in buffers whose major mode supports it and whose major mode
is one
of `font-lock-global-modes'. For example, put in your ~/.emacs:
(global-font-lock-mode t)
Where major modes support different levels of fontification, you can use
the variable `font-lock-maximum-decoration' to specify which level you
generally prefer. When you turn Font Lock mode on/off the buffer is
fontified/defontified, though fontification occurs only if the buffer is
less than `font-lock-maximum-size'.
To add your own highlighting for some major mode, and modify the
highlighting
selected automatically via the variable `font-lock-maximum-decoration',
you can
use `font-lock-add-keywords'.
To fontify a buffer, without turning on Font Lock mode and regardless of
buffer
size, you can use M-x font-lock-fontify-buffer.
To fontify a block (the function or paragraph containing point, or a
number of
lines around point), perhaps because modification on the current line caused
syntactic change on other lines, you can use M-x font-lock-fontify-block.
See the variable `font-lock-defaults-alist' for the Font Lock mode default
settings. You can set your own default settings for some mode, by setting a
buffer local value for `font-lock-defaults', via its mode hook.
The above is the default behavior of `font-lock-mode'; you may specify
your own function which is called when `font-lock-mode' is toggled via
`font-lock-function'.
\f
Global-auto-composition minor mode (no indicator):
Toggle Auto-Composition mode in every possible buffer.
With prefix ARG, turn Global-Auto-Composition mode on if and only if ARG
is positive.
Auto-Composition mode is enabled in all buffers where
`turn-on-auto-composition-if-enabled' would do it.
See `auto-composition-mode' for more information on Auto-Composition mode.
\f
Global-font-lock minor mode (no indicator):
Toggle Font-Lock mode in every possible buffer.
With prefix ARG, turn Global-Font-Lock mode on if and only if ARG is
positive.
Font-Lock mode is enabled in all buffers where
`turn-on-font-lock-if-desired' would do it.
See `font-lock-mode' for more information on Font-Lock mode.
\f
Iswitchb minor mode (no indicator):
Toggle Iswitchb global minor mode.
With arg, turn Iswitchb mode on if ARG is positive, otherwise turn it off.
This mode enables switching between buffers using substrings. See
`iswitchb' for details.
(fn &optional ARG)
\f
Line-number minor mode (no indicator):
Toggle Line Number mode.
With ARG, turn Line Number mode on if ARG is positive, otherwise
turn it off. When Line Number mode is enabled, the line number
appears in the mode line.
Line numbers do not appear for very large buffers and buffers
with very long lines; see variables `line-number-display-limit'
and `line-number-display-limit-width'.
\f
Menu-bar minor mode (no indicator):
Toggle display of a menu bar on each frame.
This command applies to all frames that exist and frames to be
created in the future.
With a numeric argument, if the argument is positive,
turn on menu bars; otherwise, turn off menu bars.
\f
Mouse-wheel minor mode (no indicator):
Toggle mouse wheel support.
With prefix argument ARG, turn on if positive, otherwise off.
Return non-nil if the new state is enabled.
(fn &optional ARG)
\f
My-keys minor mode (indicator m):
A minor mode so that my key settings override annoying major modes.
\f
Pointback minor mode (no indicator):
Restore previous window point when switching back to a buffer.
\f
Savehist minor mode (no indicator):
Toggle savehist-mode.
Positive ARG turns on `savehist-mode'. When on, savehist-mode causes
minibuffer history to be saved periodically and when exiting Emacs.
When turned on for the first time in an Emacs session, it causes the
previous minibuffer history to be loaded from `savehist-file'.
This mode should normally be turned on from your Emacs init file.
Calling it at any other time replaces your current minibuffer histories,
which is probably undesirable.
(fn ARG)
\f
Show-paren minor mode (no indicator):
Toggle Show Paren mode.
With prefix ARG, turn Show Paren mode on if and only if ARG is positive.
Returns the new status of Show Paren mode (non-nil means on).
When Show Paren mode is enabled, any matching parenthesis is highlighted
in `show-paren-style' after `show-paren-delay' seconds of Emacs idle time.
(fn &optional ARG)
\f
Tooltip minor mode (no indicator):
Toggle Tooltip mode.
With ARG, turn Tooltip mode on if and only if ARG is positive.
When this minor mode is enabled, Emacs displays help text
in a pop-up window for buttons and menu items that you put the mouse on.
(However, if `tooltip-use-echo-area' is non-nil, this and
all pop-up help appears in the echo area.)
When Tooltip mode is disabled, Emacs displays one line of
the help text in the echo area, and does not make a pop-up window.
\f
Transient-mark minor mode (no indicator):
Toggle Transient Mark mode.
With ARG, turn Transient Mark mode on if ARG is positive, off otherwise.
In Transient Mark mode, when the mark is active, the region is highlighted.
Changing the buffer "deactivates" the mark.
So do certain other operations that set the mark
but whose main purpose is something else--for example,
incremental search, <, and >.
You can also deactivate the mark by typing C-g or
M-ESC ESC.
Many commands change their behavior when Transient Mark mode is in effect
and the mark is active, by acting on the region instead of their usual
default part of the buffer's text. Examples of such commands include
M-;, M-x flush-lines, M-x keep-lines, M-%, <f4>, M-x ispell, and C-_.
Invoke C-h d and type "transient" or
"mark.*active" at the prompt, to see the documentation of
commands which are sensitive to the Transient Mark mode.
\f
Yas/Global minor mode (no indicator):
Toggle Yas/Minor mode in every possible buffer.
With prefix ARG, turn Yas/Global mode on if and only if ARG is positive.
Yas/Minor mode is enabled in all buffers where `yas/minor-mode-on' would
do it.
See `yas/minor-mode' for more information on Yas/Minor mode.
\f
Yas/Minor minor mode (indicator yas):
Toggle YASnippet mode.
When YASnippet mode is enabled, the `tas/trigger-key' key expands
snippets of code depending on the mode.
With no argument, this command toggles the mode.
positive prefix argument turns on the mode.
Negative prefix argument turns off the mode.
You can customize the key through `yas/trigger-key'.
Key bindings:
key binding
--- -------
C-c Prefix Command
C-c & Prefix Command
C-c & C-f yas/find-snippets
C-c & C-n yas/new-snippet
C-c & C-s yas/insert-snippet
C-c & C-v yas/visit-snippet-file
[back]
>
> If so, the help shows the file where the function is defined. Can you
> verify that this is the file in the clone of the git repository?
Attach a sreenshot, as I would not believe it myself.
Also if I ask for the buffers file, it shows the correct file in
git-repo at my home-dir:
/home/MY_USERNAME/org-mode/lisp/org.el
>
> Best,
> -- David
>
[-- Attachment #2: org.png --]
[-- Type: image/png, Size: 168657 bytes --]
[-- Attachment #3: Type: text/plain, Size: 201 bytes --]
_______________________________________________
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
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: Re: org-default-notes-file
2010-10-18 18:16 ` org-default-notes-file David Maus
2010-10-18 18:59 ` Andreas Röhler
@ 2010-10-18 19:18 ` Andreas Röhler
1 sibling, 0 replies; 19+ messages in thread
From: Andreas Röhler @ 2010-10-18 19:18 UTC (permalink / raw)
To: David Maus; +Cc: emacs-orgmode, Noorul Islam K M, Carsten Dominik
Am 18.10.2010 20:16, schrieb David Maus:
> At Mon, 18 Oct 2010 13:54:30 +0200,
> Andreas Röhler wrote:
>>
>> same here unfortunatly.
>> load-path displays the git-org repo, org-mode is loaded from there.
>>
>> (require 'org-macs) is present there but
>> org-string-nw-p still unknown.
>>
>
> The only explanation that makes sense to me is a mixup of old and new
> Org files: org-string-nw-p is a regular function and org-macs is
> required by org.el
>
> It was added Tue Jul 20 07:54:11 2010 +0200 -- do you have a function:
>
> org-not-nil
> (C-h f org-not-nil RET)
>
> and, say, org-plist-delete
> (C-h f org-plist-delete RET)
>
> If so, the help shows the file where the function is defined. Can you
> verify that this is the file in the clone of the git repository?
>
> Best,
> -- David
>
Hi,
some good news:
with emacs -Q
and evaluating
(add-to-list 'load-path "~/org-mode/lisp/")
(load "~/org-mode/lisp/org.el"))
it's fine.
Thanks all
Andreas
^ permalink raw reply [flat|nested] 19+ messages in thread
* Re: org-default-notes-file
2010-10-18 10:03 ` org-default-notes-file Noorul Islam K M
2010-10-18 11:05 ` org-default-notes-file Louis Turk
@ 2010-10-18 21:10 ` Sébastien Vauban
1 sibling, 0 replies; 19+ messages in thread
From: Sébastien Vauban @ 2010-10-18 21:10 UTC (permalink / raw)
To: emacs-orgmode-mXXj517/zsQ
Hi,
Noorul Islam K M wrote:
> Louis Turk <lou-4aqFAYCv5yXPgmLn+eRUI75dPsmED6B0@public.gmane.org> writes:
>> On 10/18/2010 05:20 PM, Noorul Islam K M wrote:
>>> Louis Turk<lou-4aqFAYCv5yXPgmLn+eRUI75dPsmED6B0@public.gmane.org> writes:
>>>> GNU Emacs 23.2.1 (x86_64-unknown-linux-gnu, GTK+ Version 2.20.0) of
>>>> 2010-05-08 on pidsley.hoetzel.info
>>>>
>>>> Org-mode version 6.33x (release_7.01h.718.g0cb3c5.dirty)
Such a mix clearly indicates that:
- you have used some libs from v6.33
- you have a clean working copy of the current Org elsewhere
If you look at your load-path, you will see that your repo is before the Org
directory from the standard Emacs, that what you expect. Though, it seems not
respected...
Reason is you have autoloads that called some libs to be loaded *before* you
properly add the path to your Org WC, and before you explicitly load it.
For example, an s-expr in your diary file, when that one is read, or something
like that.
You can chase such things using my modified version of require:
--8<---------------cut here---------------start------------->8---
;; REPLACES ORIGINAL in `C source code' (dumped)
;; redefine require to leave a trace of packages being loaded
(if (not (fboundp 'orig-require))
(fset 'orig-require (symbol-function 'require))
(message "The code to redefine `require' should not be loaded twice"))
(defvar my/require-depth 0)
(defun require (feature &optional filename noerror)
"Leave a trace of packages being loaded."
(cond ((member feature features)
(message "%sRequiring `%s' (already loaded)"
(concat (make-string (* 2 my/require-depth) ? ) "+-> ")
feature))
(t
(message "%sRequiring `%s'"
(concat (make-string (* 2 my/require-depth) ? ) "+-> ")
feature)
(let ((my/require-depth (+ 1 my/require-depth)))
(orig-require feature filename noerror))
(message "%sRequiring `%s'...done"
(concat (make-string (* 2 my/require-depth) ? ) "+-> ")
feature)))))
--8<---------------cut here---------------end--------------->8---
With such, you certainly will see that Org is loaded before you think it is,
hence loading the libs that come with the standard distrib of your Emacs.
Solution is to put something similar to this at the earliest possible in your
.emacs:
--8<---------------cut here---------------start------------->8---
(my/add-to-load-path "~/src/org/" 'with-subdirs 'recursive)
(when (try-require 'org-install)
--8<---------------cut here---------------end--------------->8---
Note that this is very very tricky...
Best regards,
Seb
--
Sébastien Vauban
_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode-mXXj517/zsQ@public.gmane.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
^ permalink raw reply [flat|nested] 19+ messages in thread
end of thread, other threads:[~2010-10-18 21:10 UTC | newest]
Thread overview: 19+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2010-10-18 6:43 org-default-notes-file Louis Turk
2010-10-18 7:16 ` org-default-notes-file Noorul Islam K M
2010-10-18 8:45 ` org-default-notes-file Andreas Röhler
2010-10-18 9:02 ` org-default-notes-file Noorul Islam K M
2010-10-18 9:39 ` org-default-notes-file Andreas Röhler
2010-10-18 11:10 ` org-default-notes-file Louis Turk
2010-10-18 11:54 ` org-default-notes-file Andreas Röhler
2010-10-18 18:16 ` org-default-notes-file David Maus
2010-10-18 18:59 ` Andreas Röhler
2010-10-18 19:18 ` Andreas Röhler
[not found] ` <4CBC0BC1.40304@dayspringpublisher.com>
2010-10-18 9:09 ` org-default-notes-file Noorul Islam K M
[not found] ` <4CBC101F.3020103@dayspringpublisher.com>
2010-10-18 9:20 ` org-default-notes-file Noorul Islam K M
2010-10-18 9:53 ` org-default-notes-file Louis Turk
2010-10-18 10:03 ` org-default-notes-file Noorul Islam K M
2010-10-18 11:05 ` org-default-notes-file Louis Turk
2010-10-18 11:17 ` org-default-notes-file Noorul Islam K M
2010-10-18 11:36 ` org-default-notes-file Louis Turk
2010-10-18 17:28 ` org-default-notes-file Eric S Fraga
2010-10-18 21:10 ` org-default-notes-file Sébastien Vauban
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).