Re: Setting keybinding for org-support-shift-select t

[Emanuel Berg]

Christopher Dimech wrote:

> How can I construct a keybinding to set
>
> org-support-shift-select t

Well, here's a "straight"forward way do it:

(require 'org)
(define-key org-mode-map "\M-]"
  (lambda ()
    (interactive)
    (let ((vals (list nil t 'always)))
      (nconc vals vals)
      (setq org-support-shift-select
            (cadr (member org-support-shift-select vals)) ))))

:)

-- 
underground experts united
http://user.it.uu.se/~embe8573
https://dataswamp.org/~incal