Explorar o código

babel: fixed small input error related to empty tables

Eric Schulte %!s(int64=14) %!d(string=hai) anos
pai
achega
0a6a5b4fae
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      lisp/ob.el

+ 1 - 1
lisp/ob.el

@@ -1073,7 +1073,7 @@ code ---- the results are extracted in the syntax of the source
 					  (listp (cdr (car result)))))
 					  (listp (cdr (car result)))))
 				 result (list result))
 				 result (list result))
 			     '(:fmt (lambda (cell) (format "%s" cell)))) "\n"))
 			     '(:fmt (lambda (cell) (format "%s" cell)))) "\n"))
-	    (goto-char beg) (org-table-align))
+	    (goto-char beg) (when (org-at-table-p) (org-table-align)))
 	   ((member "file" result-params)
 	   ((member "file" result-params)
 	    (insert result))
 	    (insert result))
 	   ((member "html" result-params)
 	   ((member "html" result-params)