diff options
| author | Nicolas Goaziou <n.goaziou@gmail.com> | 2012-08-21 13:53:57 +0200 |
|---|---|---|
| committer | Nicolas Goaziou <n.goaziou@gmail.com> | 2012-08-21 13:53:57 +0200 |
| commit | 7ff8c166e663872e4c1dd8c33771519800b3a8e9 (patch) | |
| tree | c38f723c67737a00cfb9a30e19eecfdfcf754a90 | |
| parent | c71b0dacb15ee2d57a2783108fc2c3510993a8aa (diff) | |
| download | org-mode-7ff8c166e663872e4c1dd8c33771519800b3a8e9.tar.gz | |
org-table: Accept comma as a decimal mark to represent numbers
* lisp/org-table.el (org-table-number-regexp): By default, accept
comma as a decimal mark to represent numbers.
| -rw-r--r-- | lisp/org-table.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/org-table.el b/lisp/org-table.el index eddf482..b8875c0 100644 --- a/lisp/org-table.el +++ b/lisp/org-table.el @@ -112,7 +112,7 @@ table, obtained by prompting the user." :type 'string) (defcustom org-table-number-regexp - "^\\([<>]?[-+^.0-9]*[0-9][-+^.0-9eEdDx()%:]*\\|\\(0[xX]\\)[0-9a-fA-F]+\\|nan\\)$" + "^\\([<>]?[-+^.,0-9]*[0-9][-+^.,0-9eEdDx()%:]*\\|\\(0[xX]\\)[0-9a-fA-F]+\\|nan\\)$" "Regular expression for recognizing numbers in table columns. If a table column contains mostly numbers, it will be aligned to the right. If not, it will be aligned to the left. @@ -131,14 +131,14 @@ Other options offered by the customize interface are more restrictive." (const :tag "Integers" "^[-+]?[0-9]+$") (const :tag "Floating Point Numbers" - "^[-+]?\\([0-9]*\\.[0-9]+\\|[0-9]+\\.[0-9]*\\)$") + "^[-+]?\\([0-9]*[.,][0-9]+\\|[0-9]+[.,][0-9]*\\)$") (const :tag "Floating Point Number or Integer" - "^[-+]?\\([0-9]*\\.[0-9]+\\|[0-9]+\\.?[0-9]*\\)$") + "^[-+]?\\([0-9]*[.,][0-9]+\\|[0-9]+[.,]?[0-9]*\\)$") (const :tag "Exponential, Floating point, Integer" - "^[-+]?[0-9.]+\\([eEdD][-+0-9]+\\)?$") + "^[-+]?[0-9.,]+\\([eEdD][-+0-9]+\\)?$") (const :tag "Very General Number-Like, including hex" - "^\\([<>]?[-+^.0-9]*[0-9][-+^.0-9eEdDx()%]*\\|\\(0[xX]\\)[0-9a-fA-F]+\\|nan\\)$") - (string :tag "Regexp:"))) + "^\\([<>]?[-+^.,0-9]*[0-9][-+^.,0-9eEdDx()%]*\\|\\(0[xX]\\)[0-9a-fA-F]+\\|nan\\)$") + (regexp :tag "Regexp:"))) (defcustom org-table-number-fraction 0.5 "Fraction of numbers in a column required to make the column align right. |