diff options
| author | Carsten Dominik <dominik@science.uva.nl> | 2009-02-20 09:02:49 +0000 |
|---|---|---|
| committer | Carsten Dominik <dominik@science.uva.nl> | 2009-02-20 09:02:49 +0000 |
| commit | 9148fdd002c311e24adb73574447070baed4536b (patch) | |
| tree | 40b7714158ba91eb565a9e9987c5bb70e61b112f /lisp/org/org-colview.el | |
| parent | 49b5c0e87e4fc9a203225eb04820df229c5e6714 (diff) | |
| download | emacs-9148fdd002c311e24adb73574447070baed4536b.tar.gz emacs-9148fdd002c311e24adb73574447070baed4536b.tar.bz2 emacs-9148fdd002c311e24adb73574447070baed4536b.zip | |
2009-02-20 Carsten Dominik <dominik@science.uva.nl>
* org-remember.el (org-remember-apply-template): Turn off ido for
this completion.
* org.el (org-priority): Also find invisible headings, for remote
editing.
(org-completing-read-no-ido): New function.
(org-make-tags-matcher, org-set-property): Turn off ido for this completion.
* org-colview.el (org-columns-edit-value): No special treatment of
prefix arg.
Diffstat (limited to 'lisp/org/org-colview.el')
| -rw-r--r-- | lisp/org/org-colview.el | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lisp/org/org-colview.el b/lisp/org/org-colview.el index 3171332e252..5a896185590 100644 --- a/lisp/org/org-colview.el +++ b/lisp/org/org-colview.el @@ -383,8 +383,7 @@ If yes, throw an error indicating that changing it does not make sense." Where possible, use the standard interface for changing this line." (interactive) (org-columns-check-computed) - (let* ((external-key key) - (col (current-column)) + (let* ((col (current-column)) (key (or key (get-char-property (point) 'org-columns-key))) (value (get-char-property (point) 'org-columns-value)) (bol (point-at-bol)) (eol (point-at-eol)) @@ -406,9 +405,7 @@ Where possible, use the standard interface for changing this line." (org-edit-headline)))) ((equal key "TODO") (setq eval '(org-with-point-at pom - (let ((current-prefix-arg - (if external-key current-prefix-arg '(4)))) - (call-interactively 'org-todo))))) + (call-interactively 'org-todo)))) ((equal key "PRIORITY") (setq eval '(org-with-point-at pom (call-interactively 'org-priority)))) |