Преглед изворни кода

org-list: remove left-over commented code and clean white space

Nicolas Goaziou пре 13 година
родитељ
комит
b6fab3770b
1 измењених фајлова са 1 додато и 3 уклоњено
  1. 1 3
      lisp/org-list.el

+ 1 - 3
lisp/org-list.el

@@ -75,7 +75,7 @@
 
 ;;; Code:
 
-(eval-when-compile 
+(eval-when-compile
   (require 'cl))
 (require 'org-macs)
 (require 'org-compat)
@@ -1804,8 +1804,6 @@ Initial position of cursor is restored after the changes."
 		((and (match-string 3) new-box)
 		 (replace-match new-box nil nil nil 3))
 		((match-string 3)
-		 ;; (goto-char (or (match-end 2) (match-end 1)))
-		 ;; (skip-chars-backward " \t")
 		 (looking-at ".*?\\([ \t]*\\[[ X-]\\]\\)")
 		 (replace-match "" nil nil nil 1))
 		(t (let ((counterp (match-end 2)))