瀏覽代碼

Keep byte compiler happy

* lisp/org-table.el (org-table-formula-handle-first/last-rc): Bind `char'.
Carsten Dominik 14 年之前
父節點
當前提交
3d802ee691
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/org-table.el

+ 1 - 1
lisp/org-table.el

@@ -2889,7 +2889,7 @@ when a line/row is swaped out of that privileged position.  So for
 formulas that use a range of rows or columns, it may often be better
 formulas that use a range of rows or columns, it may often be better
 to anchor the formula with \"I\" row markers, or to offset from the
 to anchor the formula with \"I\" row markers, or to offset from the
 borders of the table using the @< @> $< $> makers."
 borders of the table using the @< @> $< $> makers."
-  (let (n nmax len)
+  (let (n nmax len char)
     (while (string-match "\\([@$]\\)\\(<+\\|>+\\)" s)
     (while (string-match "\\([@$]\\)\\(<+\\|>+\\)" s)
       (setq nmax (if (equal (match-string 1 s) "@")
       (setq nmax (if (equal (match-string 1 s) "@")
 		     (1- (length org-table-dlines))
 		     (1- (length org-table-dlines))