* assign tags via helm/avy?
@ 2016-05-29 15:00 Xebar Saram
2016-05-31 0:42 ` John Kitchin
0 siblings, 1 reply; 6+ messages in thread
From: Xebar Saram @ 2016-05-29 15:00 UTC (permalink / raw)
To: org mode
[-- Attachment #1: Type: text/plain, Size: 647 bytes --]
Hi guys
i have a bunch of tags i define via
(:startgroup)
("Where?")
(:grouptags)
("@home" . ?h)
("@work" . ?w)
("@pc" . ?p)
("@family" . ?f)
("@shop" . ?s)
(:endgroup)
(:startgrouptag)
("people")
(:grouptags)
("allan" . ?a)
("bob" . ?o)
("joel" . ?j)
("david" . ?d)
("boris" . ?b)
("massimo" . ?s)
(:endgrouptag)
anyone know of a way to quick add tags via a helm/avy interface?
right now its quite cumbersome to press C-c then C-c to see a list of all
tags. also some tags have the same key (?a) and then its impossible to
select the 2nd one
thx alot in advance
Z
[-- Attachment #2: Type: text/html, Size: 1189 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread* Re: assign tags via helm/avy?
2016-05-29 15:00 assign tags via helm/avy? Xebar Saram
@ 2016-05-31 0:42 ` John Kitchin
2016-05-31 3:17 ` Xebar Saram
0 siblings, 1 reply; 6+ messages in thread
From: John Kitchin @ 2016-05-31 0:42 UTC (permalink / raw)
To: Xebar Saram; +Cc: org mode
Here is a helm approach that seems like what you want.
#+BEGIN_SRC emacs-lisp
(defun tag-lister ()
"Function that gets and returns possible tags."
(list "tag1" "tag2" "tag3"))
(defun helm-tagger ()
(interactive)
(helm
:sources
`((name . "HELM tag setter")
(candidates . ,(tag-lister))
(action . (lambda (candidate)
(org-set-tags-to (helm-marked-candidates)))))))
#+END_SRC
Xebar Saram writes:
> Hi guys
>
> i have a bunch of tags i define via
>
> (:startgroup)
> ("Where?")
> (:grouptags)
> ("@home" . ?h)
> ("@work" . ?w)
> ("@pc" . ?p)
> ("@family" . ?f)
> ("@shop" . ?s)
> (:endgroup)
>
> (:startgrouptag)
> ("people")
> (:grouptags)
> ("allan" . ?a)
> ("bob" . ?o)
> ("joel" . ?j)
> ("david" . ?d)
> ("boris" . ?b)
> ("massimo" . ?s)
> (:endgrouptag)
>
> anyone know of a way to quick add tags via a helm/avy interface?
>
> right now its quite cumbersome to press C-c then C-c to see a list of all
> tags. also some tags have the same key (?a) and then its impossible to
> select the 2nd one
>
> thx alot in advance
>
> Z
--
Professor John Kitchin
Doherty Hall A207F
Department of Chemical Engineering
Carnegie Mellon University
Pittsburgh, PA 15213
412-268-7803
@johnkitchin
http://kitchingroup.cheme.cmu.edu
^ permalink raw reply [flat|nested] 6+ messages in thread* Re: assign tags via helm/avy?
2016-05-31 0:42 ` John Kitchin
@ 2016-05-31 3:17 ` Xebar Saram
2016-05-31 3:40 ` Kaushal Modi
0 siblings, 1 reply; 6+ messages in thread
From: Xebar Saram @ 2016-05-31 3:17 UTC (permalink / raw)
To: John Kitchin; +Cc: org mode
[-- Attachment #1: Type: text/plain, Size: 1738 bytes --]
thx so much john!
is there a way where the function can auto read all the tags from
"org-tag-persistent-alist " instead of manfully adding to the function each
time a new tag is added?
best
Z
On Tue, May 31, 2016 at 3:42 AM, John Kitchin <jkitchin@andrew.cmu.edu>
wrote:
> Here is a helm approach that seems like what you want.
>
> #+BEGIN_SRC emacs-lisp
> (defun tag-lister ()
> "Function that gets and returns possible tags."
> (list "tag1" "tag2" "tag3"))
>
> (defun helm-tagger ()
> (interactive)
> (helm
> :sources
> `((name . "HELM tag setter")
> (candidates . ,(tag-lister))
> (action . (lambda (candidate)
> (org-set-tags-to (helm-marked-candidates)))))))
>
>
> #+END_SRC
> Xebar Saram writes:
>
> > Hi guys
> >
> > i have a bunch of tags i define via
> >
> > (:startgroup)
> > ("Where?")
> > (:grouptags)
> > ("@home" . ?h)
> > ("@work" . ?w)
> > ("@pc" . ?p)
> > ("@family" . ?f)
> > ("@shop" . ?s)
> > (:endgroup)
> >
> > (:startgrouptag)
> > ("people")
> > (:grouptags)
> > ("allan" . ?a)
> > ("bob" . ?o)
> > ("joel" . ?j)
> > ("david" . ?d)
> > ("boris" . ?b)
> > ("massimo" . ?s)
> > (:endgrouptag)
> >
> > anyone know of a way to quick add tags via a helm/avy interface?
> >
> > right now its quite cumbersome to press C-c then C-c to see a list of all
> > tags. also some tags have the same key (?a) and then its impossible to
> > select the 2nd one
> >
> > thx alot in advance
> >
> > Z
>
>
> --
> Professor John Kitchin
> Doherty Hall A207F
> Department of Chemical Engineering
> Carnegie Mellon University
> Pittsburgh, PA 15213
> 412-268-7803
> @johnkitchin
> http://kitchingroup.cheme.cmu.edu
>
[-- Attachment #2: Type: text/html, Size: 2840 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread* Re: assign tags via helm/avy?
2016-05-31 3:17 ` Xebar Saram
@ 2016-05-31 3:40 ` Kaushal Modi
2016-06-01 7:15 ` Xebar Saram
0 siblings, 1 reply; 6+ messages in thread
From: Kaushal Modi @ 2016-05-31 3:40 UTC (permalink / raw)
To: Xebar Saram, John Kitchin; +Cc: org mode
[-- Attachment #1: Type: text/plain, Size: 427 bytes --]
On Mon, May 30, 2016, 11:18 PM Xebar Saram <zeltakc@gmail.com> wrote:
> thx so much john!
>
> is there a way where the function can auto read all the tags from
> "org-tag-persistent-alist " instead of manfully adding to the function each
> time a new tag is added?
>
> best
>
> Z
>
If you use the ivy-family of list completion, check out the counsel
package, and the cousel-org-tag function in there.
> --
--
Kaushal Modi
[-- Attachment #2: Type: text/html, Size: 952 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread
* Re: assign tags via helm/avy?
2016-05-31 3:40 ` Kaushal Modi
@ 2016-06-01 7:15 ` Xebar Saram
2016-06-01 11:19 ` John Kitchin
0 siblings, 1 reply; 6+ messages in thread
From: Xebar Saram @ 2016-06-01 7:15 UTC (permalink / raw)
To: Kaushal Modi; +Cc: org mode, John Kitchin
[-- Attachment #1: Type: text/plain, Size: 1213 bytes --]
Thx so much guys for the great answers
Kaushal Modi: cousel-org-tag is fantastic and works very well for me
John: i did try helm with (mapcar 'car 'org-tag-persistent-alist ) but it
gave me an error:
cons: Wrong type argument: sequencep, org-tag-persistent-alist
the code i used:
(defun helm-tagger ()
(interactive)
(helm
:sources
`((name . "HELM tag setter")
(candidates . ,(mapcar 'car 'org-tag-persistent-alist ))
(action . (lambda (candidate)
(org-set-tags-to (helm-marked-candidates)))))))
to be honest cousel-org-tag works really well but if anyone else is
interested in the helm part ive posted the error
kind regards
Z
On Tue, May 31, 2016 at 6:40 AM, Kaushal Modi <kaushal.modi@gmail.com>
wrote:
>
>
> On Mon, May 30, 2016, 11:18 PM Xebar Saram <zeltakc@gmail.com> wrote:
>
>> thx so much john!
>>
>> is there a way where the function can auto read all the tags from
>> "org-tag-persistent-alist " instead of manfully adding to the function each
>> time a new tag is added?
>>
>> best
>>
>> Z
>>
>
> If you use the ivy-family of list completion, check out the counsel
> package, and the cousel-org-tag function in there.
>
>> --
>
> --
> Kaushal Modi
>
[-- Attachment #2: Type: text/html, Size: 3657 bytes --]
^ permalink raw reply [flat|nested] 6+ messages in thread* Re: assign tags via helm/avy?
2016-06-01 7:15 ` Xebar Saram
@ 2016-06-01 11:19 ` John Kitchin
0 siblings, 0 replies; 6+ messages in thread
From: John Kitchin @ 2016-06-01 11:19 UTC (permalink / raw)
To: Xebar Saram; +Cc: org mode, Kaushal Modi
I had one too many quotes in there. It should have been ,(mapcar 'car
org-tag-persistent-alist)
The counsel command is nice too. I have a lot of helm muscle memory to
work with though ;)
Xebar Saram writes:
> Thx so much guys for the great answers
>
> Kaushal Modi: cousel-org-tag is fantastic and works very well for me
>
> John: i did try helm with (mapcar 'car 'org-tag-persistent-alist ) but it
> gave me an error:
>
> cons: Wrong type argument: sequencep, org-tag-persistent-alist
>
>
> the code i used:
>
> (defun helm-tagger ()
> (interactive)
> (helm
> :sources
> `((name . "HELM tag setter")
> (candidates . ,(mapcar 'car 'org-tag-persistent-alist ))
> (action . (lambda (candidate)
> (org-set-tags-to (helm-marked-candidates)))))))
>
>
> to be honest cousel-org-tag works really well but if anyone else is
> interested in the helm part ive posted the error
>
> kind regards
>
> Z
>
>
>
> On Tue, May 31, 2016 at 6:40 AM, Kaushal Modi <kaushal.modi@gmail.com>
> wrote:
>
>>
>>
>> On Mon, May 30, 2016, 11:18 PM Xebar Saram <zeltakc@gmail.com> wrote:
>>
>>> thx so much john!
>>>
>>> is there a way where the function can auto read all the tags from
>>> "org-tag-persistent-alist " instead of manfully adding to the function each
>>> time a new tag is added?
>>>
>>> best
>>>
>>> Z
>>>
>>
>> If you use the ivy-family of list completion, check out the counsel
>> package, and the cousel-org-tag function in there.
>>
>>> --
>>
>> --
>> Kaushal Modi
>>
--
Professor John Kitchin
Doherty Hall A207F
Department of Chemical Engineering
Carnegie Mellon University
Pittsburgh, PA 15213
412-268-7803
@johnkitchin
http://kitchingroup.cheme.cmu.edu
^ permalink raw reply [flat|nested] 6+ messages in thread
end of thread, other threads:[~2016-06-01 11:19 UTC | newest]
Thread overview: 6+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2016-05-29 15:00 assign tags via helm/avy? Xebar Saram
2016-05-31 0:42 ` John Kitchin
2016-05-31 3:17 ` Xebar Saram
2016-05-31 3:40 ` Kaushal Modi
2016-06-01 7:15 ` Xebar Saram
2016-06-01 11:19 ` John Kitchin
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).