Re: [Orgmode] searchable refcard?
Hi Sebastian, On Dec 1, 2008, at 3:38 PM, Sebastian Rose wrote: Hi Carsten, Alan & Co, sorry for not following this thread closely. If the idea here is deleted from your list already or is not feasable, just ignore it. Refcard as info file How about maintaining the extended refcard as a second texinfo file? After the install, we would have two resulting info files: org and org-refcard. We could then bind a key to some `org-open-ref-card' function, that simply calls (info "(orgrefcard)"). If this would be done in info format (i.e. TexInfo), then it could simply be part of the manual itself and info could jumpt to that particular node in the manual. Context help As for help in general: How about binding a key (e.g. `C-c h') to a function calling (info &optional file-or-node) to get context-help while in an org-file? (info "(org)tags") if on a tag, (info "(org)properties and columns")if in `#+COLUMNS' line ...and so on. Often more than one section will match, so a mapping would be needed as well, as some sort of completion. I do like that idea. - Carsten ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] searchable refcard?
Carsten Dominik <[EMAIL PROTECTED]> writes: > Hi Sebastian, > > On Dec 1, 2008, at 3:38 PM, Sebastian Rose wrote: > >> Hi Carsten, Alan & Co, >> >> >> sorry for not following this thread closely. If the idea here is deleted >> from your list already or is not feasable, just ignore it. >> >> >> >> Refcard as info file >> >> >> How about maintaining the extended refcard as a second texinfo file? >> After the install, we would have two resulting info files: org and >> org-refcard. >> >> We could then bind a key to some `org-open-ref-card' function, that >> simply calls (info "(orgrefcard)"). > > > If this would be done in info format (i.e. TexInfo), then it could > simply be part of the manual itself and info could jumpt to that > particular node in the manual. Yes, true. Since the info file comes with org-mode, it would be a natural way to do this IMO. It's so simple to search in info, since C-s searches accross sections and even files. >> Context help >> >> >> As for help in general: >> >> How about binding a key (e.g. `C-c h') to a function calling (info >> &optional file-or-node) to get context-help while in an org-file? >> >> (info "(org)tags") if on a tag, >> (info "(org)properties and columns")if in `#+COLUMNS' line >> >> ...and so on. >> >> Often more than one section will match, so a mapping would be needed >> as well, as some sort of completion. > > I do like that idea. It's the only feature MS-Office and openoffice.org have, that's not in Org-mode yet :-) Just courious: How would I reveal the context at point? Would I use those predicates as `org-at-xxx-p'? Best, Sebastian -- Sebastian Rose, EMMA STIL - mediendesign, Niemeyerstr.6, 30449 Hannover Tel.: +49 (0)511 - 36 58 472 Fax: +49 (0)1805 - 233633 - 11044 mobil: +49 (0)173 - 83 93 417 Email: s.rose emma-stil de, sebastian_rose gmx de Http: www.emma-stil.de ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] searchable refcard?
On Dec 2, 2008, at 1:28 PM, Sebastian Rose wrote: Just courious: How would I reveal the context at point? Would I use those predicates as `org-at-xxx-p'? C-h f org-context RET We can extend this function if needed for context help. - Carsten ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
[Orgmode] Re: [PATCH] Clean up the description of org-archive-location
Christian Egli <[EMAIL PROTECTED]> writes: > Hi > > Carsten Dominik <[EMAIL PROTECTED]> writes: > >> I think I am ripe for a little lecture about remote repositories >> and tracking them, so that I do not need to type the location of >> your repo each time... :-) > > Can't you just do > > git remote add bernt git://git.norang.ca/org-mode > > and then > > git fetch bernt > > At least that's my take if I read the section `Fetching' of > http://www.gnome.org/~federico/news-2008-11.html#pushing-and-pulling-with-git-1. > > Yes. (sorry I sent a reply to this off-list originally) NOTE: The branches in my repository are temporary and rewritten for future work after they have been included or rejected by Carsten so you may not always find a 'for-carsten' branch in that repo. This also means you can't track the 'for-carsten' branch locally in your repository since it gets rewritten with rebase. git remote add bernt git://git.norang.ca/org-mode will add a remote named 'bernt' which you can fetch from. When you fetch a branch using git fetch bernt for-carsten it creates the missing objects in your repository and points a temporary reference FETCH_HEAD at that branch. > Unfortunatelly there is no explanation on how to merge the Bernt's > changes: > > "In the next part, we'll see how to merge Larry's changes into > ours, and how to monitor his work to pull from it regularly." You can view it compared to your master branch with gitk master FETCH_HEAD and you're free to cherry-pick commits from it. If you want to change things you can create a branch there with git checkout -b temp FETCH_HEAD then you can rebase that based on other things etc. Applying changes from my repo matches the git format-patch and git am workflow (which is normally how one deals with patches from the mailing list) if you do this: (this assumes no conflicts and creates linear history) git fetch bernt for-carsten git checkout -b temp FETCH_HEAD git rebase master git checkout master git merge temp git branch -D temp HTH, Bernt ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] searchable refcard?
Carsten, thanks for the hint! Maybe I'll try to learn a little more elisp between the years :-) I tried it the stupid way, just to see it working: (defun org-context-help () "Context help for org-mode" (interactive) (if (org-at-table-p) (info "(org)tables") (if (org-at-timestamp-p) (info "(org)timestamps") (if (org-at-item-checkbox-p) (info "(org)Checkboxes") (if (org-at-item-p) (info "(org)plain lists") (if (org-at-heading-p) (info "(org)headlines") (if (org-at-property-p) (info "(org)Properties and Columns") ))) Just for the fun of it. I tried to use a list like this: (setq org-context-help-map '(('org-at-item-checkbox-p "(org)Checkboxes" "(org)plain lists") ('org-at-item-p "(org)plain lists" "(org)Checkboxes") ('org-at-property-p "(org)Properties and Columns") ('org-at-timestamp-p "(org)timestamps" "(org)deadlines and scheduling") ('org-at-table-p "(org)tables") ('org-at-heading-p "(org)headlines"))) and dolist and eval, but I couldn't get my head around those `non-local exits' (throw and catch). It should work with a list, to offer several sections in the manual per context. And such a list would be easy to maintain. Still an elisp-dyslexic, Sebastian Carsten Dominik <[EMAIL PROTECTED]> writes: > On Dec 2, 2008, at 1:28 PM, Sebastian Rose wrote: > >> >> Just courious: >> >> How would I reveal the context at point? >> Would I use those predicates as `org-at-xxx-p'? > > > C-h f org-context RET > > We can extend this function if needed for context help. > > - Carsten > -- Sebastian Rose, EMMA STIL - mediendesign, Niemeyerstr.6, 30449 Hannover Tel.: +49 (0)511 - 36 58 472 Fax: +49 (0)1805 - 233633 - 11044 mobil: +49 (0)173 - 83 93 417 Email: s.rose emma-stil de, sebastian_rose gmx de Http: www.emma-stil.de ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
[Orgmode] problem (with emacs 21)
Dear all, I've been trying to install "org-6.13a" on two computers, both running emacs 21, and having the same error when opening a new file "a.org": "File mode specification error: (void-function org-mode)" I followed the instructions on the manual to create a backtrace, but it doesn't give any. I also cannot load org-mode with M-x. One computer is running Debian Etch and the other is running Fedora Core 6. Any help would be appreciated! Luis ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
[Orgmode] searchable refcard
I tried it the stupid way, just to see it working: (defun org-context-help () "Context help for org-mode" (interactive) (if (org-at-table-p) (info "(org)tables") (if (org-at-timestamp-p) (info "(org)timestamps") (if (org-at-item-checkbox-p) (info "(org)Checkboxes") (if (org-at-item-p) (info "(org)plain lists") (if (org-at-heading-p) (info "(org)headlines") (if (org-at-property-p) (info "(org)Properties and Columns") ))) For this kind of multi-way branch, cond is easier to deal with: (cond ((org-at-table-p) (info "(org)tables")) ((org-at-timestamp-p) (info "(org)timestamps")) ((org-at-item-checkbox-p) (info "(org)Checkboxes")) ((org-at-item-p) (info "(org)plain lists")) ((org-at-heading-p) (info "(org)headlines")) ((org-at-property-p) (info "(org)Properties and Columns"))) Just for the fun of it. I tried to use a list like this: (setq org-context-help-map '(('org-at-item-checkbox-p "(org)Checkboxes" "(org)plain lists") ('org-at-item-p "(org)plain lists" "(org)Checkboxes") ('org-at-property-p "(org)Properties and Columns") ('org-at-timestamp-p "(org)timestamps" "(org)deadlines and scheduling") ('org-at-table-p "(org)tables") ('org-at-heading-p "(org)headlines"))) For this you need (require 'cl), but what about (let ((cell (find-if (lambda (lst) (eval `(,(first lst org-context-help-map))) (when cell (eval `(,(second cell) The find avoids the need to do a non-local exit. Note that I don't understand what you're doing with having two info indices, so I ignored the second one... Alternatively (loop for (test info-entry info-entry2) in org-context-help-map when (eval `(,test)) return info-entry) using the loop macro... BTW, I don't think you want that quote inside your definition of org-context-help-map. You want '((org-at-item-checkbox-p ...)) not '(('org-at-item-checkbox-p ...)) The extra quote will be a nuisance. HTH, R ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] publish not working in git version
Hi Richard, I cannot reproduce this problem. Can you try to make a backtrace with uncompiled code so that I can at least identify the exact place where this bug is happening? Also your org-publish-alist would be good, and the project where this happens. Thanks. Anyone else having trouble with publishing recently? - Carsten On Nov 30, 2008, at 5:53 PM, Richard Riley wrote: Just a heads up for those that use publish - todays git version does not publish (or not here anyway). Backtracking to official 13a works fine. I got this back trace from org-publish-current-file: , | Debugger entered--Lisp error: (wrong-type-argument arrayp nil) | file-truename(nil) | org-publish-file("/home/shamrock/webs/richardriley/index.org") | byte-code("? Âà !)" [force org-publish-use-timestamps-flag org-publish-file buffer-file-name] 2) | org-publish-current-file(nil) | call-interactively(org-publish-current-file) | org-export(nil) | call-interactively(org-export nil nil) | recursive-edit() | byte-code("Æ @Ç=!ÈÉÊ\"ËÉ!A@)¢Ì=!ÈÍÊ\"Î!Ï Ð!\fdÑed\" VWebÒ ¥y`dbÒ ¥ Zy`|)ÓcebÔÕÖ \"ׯ!ÔØ!ÙÊÔØ!Ú +Ù" [unread-command- char debugger-args x debugger-buffer noninteractive debugger-batch- max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop- to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil recursive-edit middlestart buffer-read-only standard-output] 4) | debug(error (wrong-type-argument arrayp nil)) | file-truename(nil) | org-publish-file("/home/shamrock/webs/richardriley/index.org") | byte-code("? Âà !)" [force org-publish-use-timestamps-flag org-publish-file buffer-file-name] 2) | org-publish-current-file(nil) | call-interactively(org-publish-current-file) | org-export(nil) | call-interactively(org-export nil nil) ` regards r. ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
[Orgmode] Re: [PATCH] Clean up the description of org-archive-location
Hi Carsten Dominik <[EMAIL PROTECTED]> writes: > I think I am ripe for a little lecture about remote repositories > and tracking them, so that I do not need to type the location of > your repo each time... :-) Can't you just do git remote add bernt git://git.norang.ca/org-mode and then git fetch bernt At least that's my take if I read the section `Fetching' of http://www.gnome.org/~federico/news-2008-11.html#pushing-and-pulling-with-git-1. Unfortunatelly there is no explanation on how to merge the Bernt's changes: "In the next part, we'll see how to merge Larry's changes into ours, and how to monitor his work to pull from it regularly." HTH Christian ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
[Orgmode] Re: publish not working in git version
Carsten Dominik <[EMAIL PROTECTED]> writes: > Anyone else having trouble with publishing recently? Publishing seems to work for me. -Bernt ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] map bug
Fixed, thanks for the report. Please note that aside from bigs in the mapping function, also the example in the manual was wrong. You should use this: (length (org-map-entries t "/+WAITING" 'agenda)) HTH - Carsten On Nov 30, 2008, at 7:37 AM, Samuel Wales wrote: Manual says: The following example counts the number of entries with TODO keyword WAITING, in all agenda files. (length (org-map-entries t "/+WAITING" nil 'agenda)) Org says invalid function for the string. Newest release. -- Myalgic encephalomyelitis denialists are knowingly causing further suffering and death by opposing biomedical research on this serious infectious disease. Do you care about the world? http://www.meactionuk.org.uk/What_Is_ME_What_Is_CFS.htm ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] Re: publish not working in git version
Bernt Hansen <[EMAIL PROTECTED]> writes: > Carsten Dominik <[EMAIL PROTECTED]> writes: > >> Anyone else having trouble with publishing recently? > > Publishing seems to work for me. > Hi Carsten, Still the same. I removed the elc from org code as you requested. Latest git, following a publish file "C-c C-e f": , | Debugger entered--Lisp error: (wrong-type-argument arrayp nil) | file-truename(nil) | (file-name-as-directory (file-truename (plist-get project-plist :base-directory))) | (let* ((project ...) (project-plist ...) (ftname ...) (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir) (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing-function) (mapc ... publishing-function) (funcall publishing-function project-plist filename tmp-pub-dir))) | (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) | (if (org-publish-needed-p filename) (progn (let* ... ... ...) (org-publish-update-timestamp filename))) | (when (org-publish-needed-p filename) (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) | org-publish-file("/home/shamrock/webs/richardriley/index.org") | (let ((org-publish-use-timestamps-flag ...)) (org-publish-file (buffer-file-name))) | (save-window-excursion (let (...) (org-publish-file ...))) | org-publish-current-file(nil) | call-interactively(org-publish-current-file) | (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-process-sentinel p ...) (message "Background process \"%s\": started" p)) (call-interactively (nth 1 ass))) | (let* ((bg ...) (help "[t] insert the export option template\n[v] limit export to visible part of outline tree\n\n[a] export as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary buffer\n[R] export region as HTML\n[b] export as HTML and browse immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF, and open the resulting PDF document\n[L] export as LaTeX to temporary buffer\n\n[i] export current file as iCalendar file\n[I] export all agenda files as iCalendar files\n[c] export agenda files into combined iCalendar file\n\n[F] publish current file\n[P] publish current project\n[X] publish... (project will be prompted for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window-excursion (delete-other-windows) (with-output-to-temp-buffer "*Org Export/Publishing Help*" ...) (org-fit-window-to-buffer ...) (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ... r1)) (unless (setq ass ...) (error "No command associated with key %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call-interactively ...))) | org-export(nil) | call-interactively(org-export nil nil) | recursive-edit() | byte-code("Æ @Ç=! ÈÉÊ\"ËÉ!A@)¢Ì=! ÈÍÊ\"Î!Ï Ð !\fd Ñed\" VW ebÒ ¥y`dbÒ ¥ Zy`|)ÓcebÔÕÖ \"ׯ!ÔØ!ÙÊÔØ!Ú +Ù" [unread-command-char debugger-args x debugger-buffer noninteractive debugger-batch-max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil recursive-edit middlestart buffer-read-only standard-output] 4) | debug(error (wrong-type-argument arrayp nil)) | file-truename(nil) | (file-name-as-directory (file-truename (plist-get project-plist :base-directory))) | (let* ((project ...) (project-plist ...) (ftname ...) (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir) (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing-function) (mapc ... publishing-function) (funcall publishing-function project-plist filename tmp-pub-dir))) | (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) | (if (org-publish-needed-p filename) (progn (let* ... ... ...) (org-publish-update-timestamp filename))) | (when (org-publish-needed-p filename) (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) | org-publish-file("/home/shamrock/webs/richardriley/index.org") | (let ((org-publish-use-timestamps-flag ...)) (org-publish-file (buffer-file-name))) | (save-window-excursion (let (...) (org-publish-file ...))) | org-publish-current-file(nil) | call-interactively(org-publish-current-file) | (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set-process-sentinel p ...) (message "Background process \"%s\": started" p)) (call-interactively (nth 1 ass))) | (let* ((bg ...) (help "[t] insert the export option template\n[v] limit export to visible part of outline tree\n\n[a] export as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary buffer\n[R] export region as
Re: [Orgmode] Re: publish not working in git version
Hi Richard, the new backtrace shows that your project does not define a base directory. - Carsten On Dec 2, 2008, at 5:32 PM, Richard Riley wrote: Bernt Hansen <[EMAIL PROTECTED]> writes: Carsten Dominik <[EMAIL PROTECTED]> writes: Anyone else having trouble with publishing recently? Publishing seems to work for me. Hi Carsten, Still the same. I removed the elc from org code as you requested. Latest git, following a publish file "C-c C-e f": , | Debugger entered--Lisp error: (wrong-type-argument arrayp nil) | file-truename(nil) | (file-name-as-directory (file-truename (plist-get project- plist :base-directory))) | (let* ((project ...) (project-plist ...) (ftname ...) (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir) (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing- function) (mapc ... publishing-function) (funcall publishing- function project-plist filename tmp-pub-dir))) | (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub- dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) | (if (org-publish-needed-p filename) (progn (let* ... ... ...) (org-publish-update-timestamp filename))) | (when (org-publish-needed-p filename) (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) | org-publish-file("/home/shamrock/webs/richardriley/index.org") | (let ((org-publish-use-timestamps-flag ...)) (org-publish-file (buffer-file-name))) | (save-window-excursion (let (...) (org-publish-file ...))) | org-publish-current-file(nil) | call-interactively(org-publish-current-file) | (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set- process-sentinel p ...) (message "Background process \"%s\": started" p)) (call-interactively (nth 1 ass))) | (let* ((bg ...) (help "[t] insert the export option template \n[v] limit export to visible part of outline tree\n\n[a] export as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary buffer\n[R] export region as HTML\n[b] export as HTML and browse immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF, and open the resulting PDF document\n[L] export as LaTeX to temporary buffer\n\n[i] export current file as iCalendar file\n[I] export all agenda files as iCalendar files\n[c] export agenda files into combined iCalendar file\n\n[F] publish current file\n[P] publish current project\n[X] publish... (project will be prompted for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window- excursion (delete-other-windows) (with-output-to-temp-buffer "*Org Export/Publishing Help*" ...) (org-fit-window-to-buffer ...) (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ... r1)) (unless (setq ass ...) (error "No command associated with key %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call- interactively ...))) | org-export(nil) | call-interactively(org-export nil nil) | recursive-edit() | byte-code("Æ @Ç=!ÈÉÊ\"ËÉ!A@)¢Ì=!ÈÍÊ\"Î!Ï Ð!\fdÑed\" VWebÒ ¥y`dbÒ ¥ Zy`|)ÓcebÔÕÖ \"ׯ!ÔØ!ÙÊÔØ!Ú +Ù" [unread-command- char debugger-args x debugger-buffer noninteractive debugger-batch- max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop- to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil recursive-edit middlestart buffer-read-only standard-output] 4) | debug(error (wrong-type-argument arrayp nil)) | file-truename(nil) | (file-name-as-directory (file-truename (plist-get project- plist :base-directory))) | (let* ((project ...) (project-plist ...) (ftname ...) (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir) (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing- function) (mapc ... publishing-function) (funcall publishing- function project-plist filename tmp-pub-dir))) | (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub- dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) | (if (org-publish-needed-p filename) (progn (let* ... ... ...) (org-publish-update-timestamp filename))) | (when (org-publish-needed-p filename) (let* (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) | org-publish-file("/home/shamrock/webs/richardriley/index.org") | (let ((org-publish-use-timestamps-flag ...)) (org-publish-file (buffer-file-name))) | (save-window-excursion (let (...) (org-publish-file ...))) | org-publish-current-file(nil) | call-interactively(org-publish-current-file) | (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set- process-sentinel p ...) (message "Background process \"%s\": started" p)) (call-interactively (nth 1 ass))) | (let* ((bg ...) (help "[t] i
Re: [Orgmode] Re: publish not working in git version
Carsten Dominik <[EMAIL PROTECTED]> writes: > Hi Richard, the new backtrace shows that your project does not define > a base directory. I'll take a look, but this is very strange since it works fine with the release version. Its only the git version it falls over on. Thanks, r. > > - Carsten > > On Dec 2, 2008, at 5:32 PM, Richard Riley wrote: > >> >> Bernt Hansen <[EMAIL PROTECTED]> writes: >> >>> Carsten Dominik <[EMAIL PROTECTED]> writes: >>> Anyone else having trouble with publishing recently? >>> >>> Publishing seems to work for me. >>> >> >> Hi Carsten, >> >> Still the same. I removed the elc from org code as you requested. >> >> Latest git, following a publish file "C-c C-e f": >> >> , >> | Debugger entered--Lisp error: (wrong-type-argument arrayp nil) >> | file-truename(nil) >> | (file-name-as-directory (file-truename (plist-get project- >> plist :base-directory))) >> | (let* ((project ...) (project-plist ...) (ftname ...) >> (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir) >> (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing- >> function) (mapc ... publishing-function) (funcall publishing- >> function project-plist filename tmp-pub-dir))) >> | (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq >> tmp-pub- >> dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) >> | (if (org-publish-needed-p filename) (progn (let* ... ... ...) >> (org-publish-update-timestamp filename))) >> | (when (org-publish-needed-p filename) (let* >> (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if >> ... ... ...)) (org-publish-update-timestamp filename)) >> | org-publish-file("/home/shamrock/webs/richardriley/index.org") >> | (let ((org-publish-use-timestamps-flag ...)) (org-publish-file >> (buffer-file-name))) >> | (save-window-excursion (let (...) (org-publish-file ...))) >> | org-publish-current-file(nil) >> | call-interactively(org-publish-current-file) >> | (if (and bg (nth 2 ass) (not ...) (not ...)) (let (...) (set- >> process-sentinel p ...) (message "Background process \"%s\": >> started" p)) (call-interactively (nth 1 ass))) >> | (let* ((bg ...) (help "[t] insert the export option template >> \n[v] limit export to visible part of outline tree\n\n[a] export >> as ASCII\n\n[h] export as HTML\n[H] export as HTML to temporary >> buffer\n[R] export region as HTML\n[b] export as HTML and browse >> immediately\n[x] export as XOXO\n\n[l] export as LaTeX\n[p] export >> as LaTeX and process to PDF\n[d] export as LaTeX, process to PDF, >> and open the resulting PDF document\n[L] export as LaTeX to >> temporary buffer\n\n[i] export current file as iCalendar file\n[I] >> export all agenda files as iCalendar files\n[c] export agenda files >> into combined iCalendar file\n\n[F] publish current file\n[P] >> publish current project\n[X] publish... (project will be prompted >> for)\n[A] publish all projects") (cmds ...) r1 r2 ass) (save-window- >> excursion (delete-other-windows) (with-output-to-temp-buffer "*Org >> Export/Publishing Help*" ...) (org-fit-window-to-buffer ...) >> (message "Select command: ") (setq r1 ...)) (setq r2 (if ... ... >> r1)) (unless (setq ass ...) (error "No command associated with key >> %c" r1)) (if (and bg ... ... ...) (let ... ... ...) (call- >> interactively ...))) >> | org-export(nil) >> | call-interactively(org-export nil nil) >> | recursive-edit() >> | byte-code("Æ@Ç=ƒ!ÈÉÊ\"ˆËÉ!‰A@)¢Ì=ƒ!ÈÍÊ\"ˆÎ!ˆÏ ˆÐ !ˆ\fƒdÑed\" >> VƒWebˆÒ >> ¥yˆ`dbˆÒ >> ¥ >> Zyˆ`|ˆ)ÓcˆebˆÔÕÖ \"ˆ×Æ!ˆÔØ!ˆÙÊÔØ!ˆŠÚ ˆ+Ù‡" >> [unread-command- >> char debugger-args x debugger-buffer noninteractive debugger-batch- >> max-lines -1 debug backtrace-debug 4 t backtrace-frame lambda 5 pop- >> to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" >> message "%s" buffer-string kill-emacs "" nil recursive-edit >> middlestart buffer-read-only standard-output] 4) >> | debug(error (wrong-type-argument arrayp nil)) >> | file-truename(nil) >> | (file-name-as-directory (file-truename (plist-get project- >> plist :base-directory))) >> | (let* ((project ...) (project-plist ...) (ftname ...) >> (publishing-function ...) (base-dir ...) (pub-dir ...) tmp-pub-dir) >> (setq tmp-pub-dir (file-name-directory ...)) (if (listp publishing- >> function) (mapc ... publishing-function) (funcall publishing- >> function project-plist filename tmp-pub-dir))) >> | (progn (let* (... ... ... ... ... ... tmp-pub-dir) (setq >> tmp-pub- >> dir ...) (if ... ... ...)) (org-publish-update-timestamp filename)) >> | (if (org-publish-needed-p filename) (progn (let* ... ... ...) >> (org-publish-update-timestamp filename))) >> | (when (org-publish-needed-p filename) (let* >> (... ... ... ... ... ... tmp-pub-dir) (setq tmp-pub-dir ...) (if >> ... ... ...)) (org-publish-update-timestamp filename)) >> | org-publish-file("/home/shamrock/webs/richardriley/index.org") >> | (let ((org-publish-use-timestamps-flag .
[Orgmode] BUG - Archiving to the archive sibling duplicates tasks
Hi Carsten, I've found a bug with the archive process. ,[ test.org ] | * One | ** One One | ** One Two | ** One Three | ** One Four ` If you put the point on line 2 (The ** One One task) and then hit C-c C-x A 4 times in a row to archive the four subtasks to the archive sibling I get the following as a result: ,[ test.org ] | * One | ** Archive :ARCHIVE: | *** One One | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 13:57 | :END: | *** One One | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 13:57 | :END: | *** One Two | *** One One | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 13:57 | :END: | *** One Two | *** One Three | *** One One | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 13:57 | :END: | *** One Two | *** One Three | *** One Four ` with lots of duplicated entries. If I use the following sequence it works: C-c C-x A down arrow up arrow repeated 4 times and I end up with what I was expecting ,[ test.org ] | * One | ** Archive :ARCHIVE: | *** One One | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 14:00 | :END: | *** One Two | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 14:00 | :END: | *** One Three | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 14:00 | :END: | *** One Four | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 14:00 | :END: ` After the first C-c C-x A it looks like this (which is correct) ,[ test.org ] | * One | ** One Two | ** One Three | ** One Four | ** Archive :ARCHIVE: | *** One One | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 14:02 | :END: ` and after the second it looks like this (which is wrong) ,[ test.org ] | * One | ** One Three | ** One Four | ** Archive :ARCHIVE: | *** One One | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 14:03 | :END: | *** One One | :PROPERTIES: | :ARCHIVE_TIME: 2008-12-02 Tue 14:03 | :END: | *** One Two ` I'm running this from a minimal emacs session. I can provide the setup if you need it. $ git describe release_6.13a-23-g269c5a8 Thanks, Bernt ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] publish not working in git version
Carsten Dominik <[EMAIL PROTECTED]> writes: > Anyone else having trouble with publishing recently? Publishing is great - and works here. Regards, -- Sebastian Rose, EMMA STIL - mediendesign, Niemeyerstr.6, 30449 Hannover Tel.: +49 (0)511 - 36 58 472 Fax: +49 (0)1805 - 233633 - 11044 mobil: +49 (0)173 - 83 93 417 Email: s.rose emma-stil de, sebastian_rose gmx de Http: www.emma-stil.de ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] searchable refcard
Hi Robert, those functions you mentioned are on my list for long winter nights :-) Robert Goldman <[EMAIL PROTECTED]> writes: > (let ((cell (find-if (lambda (lst) (eval `(,(first lst > org-context-help-map))) > (when cell > (eval `(,(second cell) > > The find avoids the need to do a non-local exit. > > Note that I don't understand what you're doing with having two info > indices, so I ignored the second one... Sometimes more than just one section of the manual match the context. I would like to choose in those situations. While on a checkbox item, the sections `checkboxes' and 'plain lists' both match. RET RET should just open the default (which would be the first of those two). > Alternatively > > (loop for (test info-entry info-entry2) in org-context-help-map > when (eval `(,test)) > return info-entry) > using the loop macro... > > BTW, I don't think you want that quote inside your definition of > org-context-help-map. You want '((org-at-item-checkbox-p ...)) not > '(('org-at-item-checkbox-p ...)) The extra quote will be a nuisance. Regards, Sebastian -- Sebastian Rose, EMMA STIL - mediendesign, Niemeyerstr.6, 30449 Hannover Tel.: +49 (0)511 - 36 58 472 Fax: +49 (0)1805 - 233633 - 11044 mobil: +49 (0)173 - 83 93 417 Email: s.rose emma-stil de, sebastian_rose gmx de Http: www.emma-stil.de ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
Re: [Orgmode] publish not working in git version
Sebastian Rose <[EMAIL PROTECTED]> writes: > Carsten Dominik <[EMAIL PROTECTED]> writes: >> Anyone else having trouble with publishing recently? > > Publishing is great - and works here. Hi Sebastion, Do you have latest git head and publish to an ssh destination via tramp? > > > Regards, -- important and urgent problems of the technology of today are no longer the satisfactions of the primary needs or of archetypal wishes, but the reparation of the evils and damages by the technology of yesterday. ~Dennis Gabor, Innovations: Scientific, Technological and Social, 1970 ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode
[Orgmode] Re: publish not working in git version
Richard Riley <[EMAIL PROTECTED]> writes: > Hi Sebastion, > > Do you have latest git head and publish to an ssh destination via tramp? I do ... and it works for me. -Bernt ___ Emacs-orgmode mailing list Remember: use `Reply All' to send replies to the list. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode