From: Noam Postavsky <npostavs@gmail.com>
To: Christopher Dimech <dimech@gmx.com>
Cc: Help Gnu Emacs <help-gnu-emacs@gnu.org>
Subject: Re: Cycle Org Shift Select
Date: Mon, 9 Nov 2020 14:12:43 -0500 [thread overview]
Message-ID: <CAM-tV-8gVKeGSofba+2ARFE2ZPbBmMvZD7qe0CQdVr2hibGxsQ@mail.gmail.com> (raw)
In-Reply-To: <trinity-87d65556-4bf3-47be-a92a-29a87a50d898-1604676197126@3c-app-mailcom-bs11>
On Fri, 6 Nov 2020 at 10:23, Christopher Dimech <dimech@gmx.com> wrote:
> I am a little concerned that (nconc Shftsel Shftsel) will continually
> append, rather than just cycle through the list.
I don't understand what you mean by "continually append", but your
code will never reach `always' because you have `nil' again after `t'.
It should be enough to just put `nil' after `always':
(defun Org-Shftsel-Cycle ()
;; Switches between options to org-support-shift-select
(interactive)
(setq org-support-shift-select
(cadr (memq org-support-shift-select '(nil t always nil)))))
You could also use a circular list which saves a cons cell (i.e.,
point back to the first `nil', instead of having an "extra" one at the
end):
'#1=(nil t always . #1#)
next prev parent reply other threads:[~2020-11-09 19:12 UTC|newest]
Thread overview: 28+ messages / expand[flat|nested] mbox.gz Atom feed top
2020-11-06 15:23 Cycle Org Shift Select Christopher Dimech
2020-11-09 19:12 ` Noam Postavsky [this message]
2020-11-09 20:13 ` Michael Heerdegen
2020-11-09 20:26 ` Noam Postavsky
2020-11-09 20:31 ` Michael Heerdegen
2020-11-09 20:37 ` Noam Postavsky
2020-11-09 21:08 ` Michael Heerdegen
2020-11-09 21:19 ` Noam Postavsky
2020-11-09 20:40 ` Christopher Dimech
2020-11-09 20:42 ` Noam Postavsky
2020-11-09 20:52 ` Christopher Dimech
2020-11-09 20:53 ` Noam Postavsky
2020-11-09 21:20 ` Michael Heerdegen
2020-11-09 21:25 ` Noam Postavsky
2020-11-09 21:36 ` Michael Heerdegen
2020-11-09 21:45 ` Christopher Dimech
2020-11-09 21:49 ` Noam Postavsky
2020-11-09 21:50 ` Michael Heerdegen
2020-11-09 21:59 ` Christopher Dimech
2020-11-09 22:49 ` Christopher Dimech
2020-11-10 8:08 ` tomas
2020-11-10 10:17 ` Christopher Dimech
2020-11-10 11:10 ` Michael Heerdegen
2020-11-10 16:37 ` Drew Adams
2020-11-11 17:09 ` Drew Adams
2020-11-09 20:10 ` Michael Heerdegen
2020-11-09 20:35 ` Christopher Dimech
2020-11-09 21:18 ` Michael Heerdegen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=CAM-tV-8gVKeGSofba+2ARFE2ZPbBmMvZD7qe0CQdVr2hibGxsQ@mail.gmail.com \
--to=npostavs@gmail.com \
--cc=dimech@gmx.com \
--cc=help-gnu-emacs@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
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).