diff options
author | Marco Wahl <marcowahlsoft@gmail.com> | 2020-01-28 00:00:05 +0100 |
---|---|---|
committer | Marco Wahl <marcowahlsoft@gmail.com> | 2020-01-28 00:00:05 +0100 |
commit | 45a0fe531c5cb9cf095ae2d1e55de59d590bd333 (patch) | |
tree | 7dbb62bd398d6ccaac7eab98bd32481e0c19cee3 | |
parent | b3d1e548778cdc4fe555b5b17021c2595c6764d3 (diff) | |
download | org-mode-45a0fe531c5cb9cf095ae2d1e55de59d590bd333.tar.gz |
agenda: C-c C-c deactivates columns
* lisp/org-agenda.el (org-agenda-ctrl-c-ctrl-c): New function.
This is to unify and thereby harmonize the behavior of C-c C-c with
regard to Org files and columns.
-rw-r--r-- | etc/ORG-NEWS | 2 | ||||
-rw-r--r-- | lisp/org-agenda.el | 7 |
2 files changed, 9 insertions, 0 deletions
diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS index 1b7848e..62e1030 100644 --- a/etc/ORG-NEWS +++ b/etc/ORG-NEWS @@ -50,6 +50,8 @@ buffers are displayed by modifying ~display-buffer-alist~ or recent ~org-columns-set-tags-or-toggle~. Tag setting is still possible via column view value edit or with =<C-c C-q>=. *** ~org-datetree-find-month-create~ +*** ~org-agenda-ctrl-c-ctrl-c~ +=<C-c C-c>= for agenda. Up to now just deactivate columns. ** Removed functions and variables *** ~org-columns-set-tags-or-toggle~ diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index ac785c3..1fcaa8a 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -2422,6 +2422,8 @@ The following commands are available: (define-key org-agenda-mode-map [remap forward-paragraph] 'org-agenda-forward-block) (define-key org-agenda-mode-map [remap backward-paragraph] 'org-agenda-backward-block) +(org-defkey org-agenda-mode-map "\C-c\C-c" 'org-agenda-ctrl-c-ctrl-c) + (when org-agenda-mouse-1-follows-link (org-defkey org-agenda-mode-map [follow-link] 'mouse-face)) (easy-menu-define org-agenda-menu org-agenda-mode-map "Agenda menu" @@ -10548,6 +10550,11 @@ when defining today." (org-extend-today-until (1+ hour))) (org-agenda-todo arg))) +(defun org-agenda-ctrl-c-ctrl-c () + "If columns are active, deactivate them." + (interactive) + (when org-agenda-columns-active (org-columns-quit))) + (provide 'org-agenda) ;;; org-agenda.el ends here |