소스 검색

Merge branch 'hotfix'

Bastien Guerry 13 년 전
부모
커밋
8ab0dedc4e
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      lisp/org-table.el

+ 2 - 2
lisp/org-table.el

@@ -2663,8 +2663,8 @@ in the buffer and column1 and column2 are table column numbers."
 ;      (setq r2 (or r2 r1) c2 (or c2 c1))
 ;      (setq r2 (or r2 r1) c2 (or c2 c1))
       (if (not r1) (setq r1 thisline))
       (if (not r1) (setq r1 thisline))
       (if (not r2) (setq r2 thisline))
       (if (not r2) (setq r2 thisline))
-      (if (not c1) (setq c1 col))
-      (if (not c2) (setq c2 col))
+      (if (or (not c1) (= 0 c1)) (setq c1 col))
+      (if (or (not c2) (= 0 c2)) (setq c2 col))
       (if (and (not corners-only)
       (if (and (not corners-only)
 	       (or (not rangep) (and (= r1 r2) (= c1 c2))))
 	       (or (not rangep) (and (= r1 r2) (= c1 c2))))
 	  ;; just one field
 	  ;; just one field