Prechádzať zdrojové kódy

Merge branch 'maint'

Nicolas Goaziou 11 rokov pred
rodič
commit
eaa458594f
1 zmenil súbory, kde vykonal 3 pridanie a 1 odobranie
  1. 3 1
      lisp/ox.el

+ 3 - 1
lisp/ox.el

@@ -4452,6 +4452,8 @@ same column as TABLE-CELL.  If no such cookie is found, a default
 alignment value will be deduced from fraction of numbers in the
 column (see `org-table-number-fraction' for more information).
 Possible values are `left', `right' and `center'."
+  ;; Load `org-table-number-fraction' and `org-table-number-regexp'.
+  (require 'org-table)
   (let* ((row (org-export-get-parent table-cell))
 	 (table (org-export-get-parent row))
 	 (cells (org-element-contents row))
@@ -4460,7 +4462,7 @@ Possible values are `left', `right' and `center'."
 	 (cache (or (plist-get info :table-cell-alignment-cache)
 		    (plist-get (setq info
 				     (plist-put info :table-cell-alignment-cache
-						(make-hash-table :test 'equal)))
+						(make-hash-table :test 'eq)))
 			       :table-cell-alignment-cache)))
 	 (align-vector (or (gethash table cache)
 			   (puthash table (make-vector columns nil) cache))))