[O] [PATCH] org-agenda: Disable message logging for some messages
* lisp/org-agenda.el (org-agenda-filter-by-tag): (org-agenda-view-mode-dispatch): (org-agenda-diary-entry): (org-agenda-bulk-action): Disable message logging for some messages. --- When under the *Org Agenda* buffer, my *Messages* buffer is filled quickly by these "prompt"-like messages, I prefer they are not written to the *Messages* buffer. lisp/org-agenda.el | 40 ++-- 1 file changed, 22 insertions(+), 18 deletions(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index b2729c1ca..6d04c8d35 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -7535,12 +7535,13 @@ also press `-' or `+' to switch between filtering and excluding." a n tag) (unless char (while (not (memq char valid-char-list)) - (message -"%s by tag [%s ]:tag-char, [TAB]:tag, %s[/]:off, [+/-]:filter/exclude%s, [q]:quit" -(if exclude "Exclude" "Filter") -tag-chars -(if org-agenda-auto-exclude-function "[RET], " "") -(if expand "" ", no grouptag expand")) + (let ((message-log-max nil)) + (message + "%s by tag [%s ]:tag-char, [TAB]:tag, %s[/]:off, [+/-]:filter/exclude%s, [q]:quit" + (if exclude "Exclude" "Filter") + tag-chars + (if org-agenda-auto-exclude-function "[RET], " "") + (if expand "" ", no grouptag expand"))) (setq char (read-char-exclusive)) ;; Excluding or filtering down (cond ((eq char ?-) (setq exclude t)) @@ -7976,9 +7977,10 @@ With prefix ARG, go backward that many times the current span." (defun org-agenda-view-mode-dispatch () "Call one of the view mode commands." (interactive) - (message "View: [d]ay [w]eek for[t]night [m]onth [y]ear [SPC]reset [q]uit/abort + (let ((message-log-max nil)) +(message "View: [d]ay [w]eek for[t]night [m]onth [y]ear [SPC]reset [q]uit/abort time[G]rid [[]inactive [f]ollow [l]og[L]og-all [c]lockcheck - [a]rch-trees [A]rch-files clock[R]eport include[D]iary [E]ntryText") + [a]rch-trees [A]rch-files clock[R]eport include[D]iary [E]ntryText")) (pcase (read-char-exclusive) (?\ (call-interactively 'org-agenda-reset-view)) (?d (call-interactively 'org-agenda-day-view)) @@ -9578,7 +9580,8 @@ entries in that Org file." (org-agenda-diary-entry-in-org-file) (require 'diary-lib) (let* ((char (progn - (message "Diary entry: [d]ay [w]eekly [m]onthly [y]early [a]nniversary [b]lock [c]yclic") + (let ((message-log-max nil)) +(message "Diary entry: [d]ay [w]eekly [m]onthly [y]early [a]nniversary [b]lock [c]yclic")) (read-char-exclusive))) (cmd (cdr (assoc char '((?d . diary-insert-entry) @@ -9862,15 +9865,16 @@ The prefix arg is passed through to the command if possible." (user-error "Marker %s for bulk command is invalid" m))) ;; Prompt for the bulk command. - (message - (concat (if org-agenda-persistent-marks "Bulk (persistent): " "Bulk: ") - "[$]arch [A]rch->sib [t]odo [+/-]tag [s]chd [d]eadline [r]efile " - "[S]catter [f]unction" - (and org-agenda-bulk-custom-functions - (format " Custom: [%s]" - (mapconcat (lambda (f) (char-to-string (car f))) - org-agenda-bulk-custom-functions - "") + (let ((message-log-max nil)) +(message + (concat (if org-agenda-persistent-marks "Bulk (persistent): " "Bulk: ") +"[$]arch [A]rch->sib [t]odo [+/-]tag [s]chd [d]eadline [r]efile " +"[S]catter [f]unction" +(and org-agenda-bulk-custom-functions + (format " Custom: [%s]" + (mapconcat (lambda (f) (char-to-string (car f))) +org-agenda-bulk-custom-functions +"")) (catch 'exit (let* ((org-log-refile (if org-log-refile 'time nil)) (entries (reverse org-agenda-bulk-marked-entries)) -- 2.15.1
Re: [O] Orgmode repeater intervals with end date
You can try this: ``` * Test repeat time range with end date DEADLINE: <2018-01-01 Mon 12:00 .+2d>--<2018-01-13 Sat> ``` This will repeat, and end on the day 13. Also deadline works fine. [stardiviner] GPG key ID: 47C32433 IRC(freeenode): stardiviner Twitter: @numbchild Key fingerprint = 9BAA 92BC CDDD B9EF 3B36 CB99 B8C4 B8E5 47C3 2433 Blog: http://stardiviner.github.io/ On Thu, Jan 11, 2018 at 7:37 PM, wrote: > On 2018-01-10 18:24, ed...@openmail.cc wrote: > >> Message: 8 >>> Date: Tue, 09 Jan 2018 22:16:56 -0700 >>> From: torys.ander...@gmail.com (Tory S. Anderson) >>> To: orgmode list >>> Subject: [O] Orgmode repeater intervals with end date >>> Message-ID: <87incamgxj@byu.edu> >>> Content-Type: text/plain; format=flowed >>> >>> Hi all, >>> >>> When repeater intervals are set on on org dates (eg =<2018-01-10 >>> Wed 16:00 +2w>=) the >>> output is exported nicely to ical and appears >>> nicely in agenda. Is there anyway to put an end-date on org dates >>> so that the +2w will not just continue forever? >>> >>> I could use org-class, but then it wouldn't be exported to ical >>> nicely. I was hopefully with <2018-01-10 Wed 16:00 >>> +2w>--<2018-04-10 Wed 16:00 +2w> but this just put the range as >>> counting every day in the interim. Is there an existing way to >>> have an end-date on a repeating cycle? >>> >>> - Tory >>> >> >> Have you tried with DEADLINE:? I seem to remember to have read >> something like that somewhere. Don't trust me. If it helps, I am glad, >> but I am not sure. >> >> > Have a look at https://www.gnu.org/software/e > macs/manual/html_node/emacs/Sexp-Diary-Entries.html However, I am not > sure if you can use an Emacs sexp to specify an end date. > > Ian. > >
Re: [O] Uninstall bbdb
I didn't catch this at first but if continued this should be moved to the BBDB mailing list. On Thu, Jan 11, 2018 at 9:36 PM, Eric S Fraga wrote: > On Thursday, 11 Jan 2018 at 13:48, Bob Newell wrote: >> But the real question is /why/ would you want to delete BBDB? You get > > And supplementary question: if you (directed at the OP) don't use it, > how does it affect you even if it is installed? > > -- > Eric S Fraga via Emacs 27.0.50, Org release_9.1.6-317-gc82c21 -- Bob Newell Honolulu, Hawai`i Sent via Linux Mint 17.
Re: [O] Small bug in example code
On 12 January 2018 at 08:42, Eric S Fraga wrote: > On Thursday, 11 Jan 2018 at 20:13, Reuben Thomas wrote: > > Hi, > > > > I just tried to update my worg repo clone for the first time in a while, > > and my key no longer seems to work. The key hasn't changed, but I see > from > > ssh output that the host for the repo has. I attach my public key in case > > it needs to be re-installed. > > Specifically, Bastien said: > > For Org and Worg COMMITTERS > > > You will need to create a new user on https://code.orgmode.org in > order to push commits to org-mode.git or worg.git: > > 1. Create a user on https://code.orgmode.org > 2. Add your ssh public key > 3. Send me an email to be added as a collaborator on Org/Worg Thanks very much, Eric. Did I overlook these instructions online, or if they're not there, could they be posted on the web site? -- https://rrt.sc3d.org
[O] speed-keys access tweak
With the (bolp) check snipped, org-speed-commands work up to the end of org-outline-regexp. (defun org-speed-command-activate (keys) (when (or (looking-at org-outline-regexp) (and (functionp org-use-speed-commands) (funcall org-use-speed-commands))) (cdr (assoc keys (append org-speed-commands-user org-speed-commands-default) Works for me. Could this be legit --- or safer? Thanks. m
Re: [O] Feature request: #+INCLUDE: with anchors
Message: 6 Date: Thu, 11 Jan 2018 11:39:29 +0100 From: Rasmus To: emacs-orgmode@gnu.org Subject: Re: [O] Feature request: #+INCLUDE: with anchors Message-ID: <878td4r866@gmx.us> Content-Type: text/plain; charset=utf-8 What would happen if one of the keywords aren?t unique? Get the first instance? what happens when a referenced heading, block or table is not unique (or doesn't exist)? Something similar can already be done in Org. See this part of the manual: Inclusions may specify a file-link to extract an object matched by org-link-search (see Search options). To extract only the contents of the matched object, set :only-contents property to non-nil. This will omit any planning lines or property drawers. The ranges for :lines keyword are relative to the requested element. Some examples: #+INCLUDE: "./paper.org::#theory" :only-contents t Include the body of the heading with the custom id ?theory? #+INCLUDE: "./paper.org::mytable" Include named element. #+INCLUDE: "./paper.org::*conclusion" :lines 1-20 Include the first 20 lines of the headline named ?conclusion?. Although I was aware of this, I think that what you write is very useful, thank you. - ONLY AT VFEmail! - Use our Metadata Mitigator to keep your email out of the NSA's hands! $24.95 ONETIME Lifetime accounts with Privacy Features! 15GB disk! No bandwidth quotas! Commercial and Bulk Mail Options!
Re: [O] Small bug in example code
On Thursday, 11 Jan 2018 at 20:13, Reuben Thomas wrote: > Hi, > > I just tried to update my worg repo clone for the first time in a while, > and my key no longer seems to work. The key hasn't changed, but I see from > ssh output that the host for the repo has. I attach my public key in case > it needs to be re-installed. Specifically, Bastien said: For Org and Worg COMMITTERS You will need to create a new user on https://code.orgmode.org in order to push commits to org-mode.git or worg.git: 1. Create a user on https://code.orgmode.org 2. Add your ssh public key 3. Send me an email to be added as a collaborator on Org/Worg -- Eric S Fraga via Emacs 27.0.50, Org release_9.1.6-317-gc82c21 signature.asc Description: PGP signature
Re: [O] Small bug in example code
On Thursday, 11 Jan 2018 at 20:13, Reuben Thomas wrote: > Hi, > > I just tried to update my worg repo clone for the first time in a while, > and my key no longer seems to work. The key hasn't changed, but I see from > ssh output that the host for the repo has. I attach my public key in case > it needs to be re-installed. Bastien posted instructions on what you need to do in late December. -- Eric S Fraga via Emacs 27.0.50, Org release_9.1.6-317-gc82c21 signature.asc Description: PGP signature
