소스 검색

org-set-effort: Remove extra space in prompt

* lisp/org.el (org-set-effort): Make spacing across different prompt
  cases consistent.  Simplify prompt concatenation.
Kyle Meyer 8 년 전
부모
커밋
b237d4df04
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      lisp/org.el

+ 2 - 2
lisp/org.el

@@ -15701,8 +15701,8 @@ When INCREMENT is non-nil, set the property to the next allowed value."
 	       (t
 		(let (org-completion-use-ido org-completion-use-iswitchb)
 		  (org-completing-read
-		   (concat "Effort " (if (and cur (string-match "\\S-" cur))
-					 (concat "[" cur "]") "")
+		   (concat "Effort" (and cur (string-match "\\S-" cur)
+					 (concat " [" cur "]"))
 			   ": ")
 		   existing nil nil "" nil cur))))))
     (unless (equal (org-entry-get nil prop) val)