Hi Sébastien,

"Sebastien Vauban" <wxhgmqzgw...@spammotel.com> writes:

> Bastien wrote:
>> "Sebastien Vauban" <wxhgmqzgw...@spammotel.com> writes:
>>
>>> The error
>>>
>>>     if: Can't find remote table "onsite"
>>>
>>> is reported if the table name is in downcase (as in the following
>>> example).
>>
>> Can you try this patch and report?
>
> 1. Applied the patch manually.
> 2. Restarted Emacs (to be sure, as it is a defconst).
> 3. Tested.
>
>    But, no, it does not work on the provided example: remote table is still
>    not found.

Please test this new patch.

I won't apply this before we sort out the conventions around using
downcase/uppercase keywords, as Ilya stated a while ago.

Thanks,

diff --git a/lisp/ob.el b/lisp/ob.el
index 726245c..49ce76a 100644
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -439,3 +439,3 @@ specific header arguments as well.")
 
-(defvar org-babel-data-names '("TBLNAME" "RESULTS" "NAME"))
+(defvar org-babel-data-names '("tblname" "results" "name"))
 
diff --git a/lisp/org-table.el b/lisp/org-table.el
index ae12cee..4bf025b 100644
--- a/lisp/org-table.el
+++ b/lisp/org-table.el
@@ -3828,3 +3828,3 @@ Use COMMAND to do the motion, repeat if necessary to end up in a data line."
 (defconst orgtbl-line-start-regexp
-  "[ \t]*\\(|\\|#\\+\\(TBLFM\\|ORGTBL\\|TBLNAME\\):\\)"
+  "[ \t]*\\(|\\|#\\+\\(tblfm\\|orgtbl\\|tblname\\):\\)"
   "Matches a line belonging to an orgtbl.")
@@ -4734,3 +4734,3 @@ list of the fields in the rectangle ."
 	    (if (re-search-forward
-		 (concat "^[ \t]*#\\+TBLNAME:[ \t]*" (regexp-quote name-or-id) "[ \t]*$")
+		 (concat "^[ \t]*#\\+tblname:[ \t]*" (regexp-quote name-or-id) "[ \t]*$")
 		 nil t)

-- 
 Bastien

Reply via email to