summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2009-09-08 11:10:13 +0800
committerBastien Guerry <bzg@altern.org>2009-09-08 11:10:13 +0800
commit84c24359689004cc646221ad5c4399bb0acffdd8 (patch)
treef6c0f5d46d3c9b9a7d0abafcf8787964ff892f10
parent2546c1ef0cc3e4568a6842aa3750ef3ac5fd4e4b (diff)
downloadorg-mode-84c24359689004cc646221ad5c4399bb0acffdd8.tar.gz
Minor visual improvements.
org.el (org-offer-links-in-entry): Don't use "Select link" as a prompt in the temporary window. org-agenda.el (org-agenda-bulk-mark): Use a slightly soberer prefix for marked entries in the agenda view.
-rwxr-xr-xlisp/ChangeLog8
-rw-r--r--lisp/org-agenda.el2
-rw-r--r--lisp/org.el1
3 files changed, 9 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6bd5c54..84c3054 100755
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,11 @@
+2009-09-08 Bastien Guerry <bzg@altern.org>
+
+ * org.el (org-offer-links-in-entry): Don't use "Select link" as a
+ prompt in the temporary window.
+
+ * org-agenda.el (org-agenda-bulk-mark): Use a slightly soberer
+ prefix for marked entries in the agenda view.
+
2009-09-07 Andreas Burtzlaff <andy13@gmx.net> (tiny change)
* org.el (outline-end-of-subtree): Bugfix: advise this function in
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 60cb113..04b5514 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -6559,7 +6559,7 @@ This is a command that has to be installed in `calendar-mode-map'."
(unless m (error "Nothing to mark at point"))
(push m org-agenda-bulk-marked-entries)
(setq ov (org-make-overlay (point-at-bol) (+ 2 (point-at-bol))))
- (org-overlay-display ov ">>"
+ (org-overlay-display ov "> "
(org-get-todo-face "TODO")
'evaporate)
(org-overlay-put ov 'type 'org-marked-entry-overlay))
diff --git a/lisp/org.el b/lisp/org.el
index b58cacc..39ef466 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -8094,7 +8094,6 @@ there is one, offer it as link number zero."
(save-window-excursion
(delete-other-windows)
(with-output-to-temp-buffer "*Select Link*"
- (princ "Select link\n\n")
(mapc (lambda (l)
(if (not (string-match org-bracket-link-regexp l))
(princ (format "[%c] %s\n" (incf cnt)