[Babel] Getting Info On Empty Source Block Fails

[Babel] Getting Info On Empty Source Block Fails

[aditya siram]

[-- Attachment #1: Type: text/plain, Size: 736 bytes --]

Hi all,
`org-babel-get-src-block-info` on an empty block fails.

Given:
#+BEGIN_SRC c
#+END_SRC

#+BEGIN_SRC c
non-empty
#+END_SRC

Running `org-babel-get-src-block-info` with point at the beginning of the
first line gives:
("c" "#+END_SRC

#+BEGIN_SRC c
non-empty" ((:colname-names) (:rowname-names) (:result-params "replace")
(:result-type . value) (:comments . "") (:shebang . "") (:cache . "no")
(:padline . "") (:noweb . "no") (:tangle . "no") (:exports . "code")
(:results . "replace") ...) "" nil 0 8)

The problem is somewhere in `org-babel-src-block-regex` but I didn't want
to mess with it because it touches all parts of org-babel and I'm not sure
what else would break.

Any advice on how to fix this is appreciated.
-deech

[-- Attachment #2: Type: text/html, Size: 1048 bytes --]

Re: [Babel] Getting Info On Empty Source Block Fails

[Eric Schulte]

aditya siram <aditya.siram@gmail.com> writes:

> Hi all,
> `org-babel-get-src-block-info` on an empty block fails.
>
> Given:
> #+BEGIN_SRC c
> #+END_SRC
> #+BEGIN_SRC c
> non-empty
> #+END_SRC
>
> Running `org-babel-get-src-block-info` with point at the beginning of the
> first line gives:
> ("c" "#+END_SRC
>
> #+BEGIN_SRC c
> non-empty" ((:colname-names) (:rowname-names) (:result-params "replace")
> (:result-type . value) (:comments . "") (:shebang . "") (:cache . "no")
> (:padline . "") (:noweb . "no") (:tangle . "no") (:exports . "code")
> (:results . "replace") ...) "" nil 0 8)
>
> The problem is somewhere in `org-babel-src-block-regex` but I didn't want
> to mess with it because it touches all parts of org-babel and I'm not sure
> what else would break.
>
> Any advice on how to fix this is appreciated.
> -deech

This works for me.  With the point on the first "#" in

> #+BEGIN_SRC c
> #+END_SRC


I get

,----[C-c C-v I]
| Lang: c
| Header Arguments:
| 	:cache		no
| 	:exports	code
| 	:hlines		no
| 	:noweb		yes
| 	:padnewline	yes
| 	:results	replace
| 	:session	none
| 	:tangle		no
| 
| [back]
`----

and

,----[M-: (org-babel-get-src-block-info)]
| ("c" "" ((:colname-names) (:rowname-names) (:result-params "replace")
|          (:result-type . value) (:comments . "") (:shebang . "")
|          (:cache . "no") (:padline . "") (:noweb . "yes") (:tangle . "no")
|          (:exports . "code") (:results . "replace") ...) "" nil 0 882)
`----

Cheers,

-- 
Eric Schulte
https://cs.unm.edu/~eschulte
PGP: 0x614CA05D

Re: [Babel] Getting Info On Empty Source Block Fails

[aditya siram]

[-- Attachment #1: Type: text/plain, Size: 1958 bytes --]

I believe this may have been an instance of the regex being too greedy
which is fixed by the patch I submitted.
-deech


On Fri, Sep 13, 2013 at 12:05 PM, Eric Schulte <schulte.eric@gmail.com>wrote:

> aditya siram <aditya.siram@gmail.com> writes:
>
> > Hi all,
> > `org-babel-get-src-block-info` on an empty block fails.
> >
> > Given:
> > #+BEGIN_SRC c
> > #+END_SRC
> > #+BEGIN_SRC c
> > non-empty
> > #+END_SRC
> >
> > Running `org-babel-get-src-block-info` with point at the beginning of the
> > first line gives:
> > ("c" "#+END_SRC
> >
> > #+BEGIN_SRC c
> > non-empty" ((:colname-names) (:rowname-names) (:result-params "replace")
> > (:result-type . value) (:comments . "") (:shebang . "") (:cache . "no")
> > (:padline . "") (:noweb . "no") (:tangle . "no") (:exports . "code")
> > (:results . "replace") ...) "" nil 0 8)
> >
> > The problem is somewhere in `org-babel-src-block-regex` but I didn't want
> > to mess with it because it touches all parts of org-babel and I'm not
> sure
> > what else would break.
> >
> > Any advice on how to fix this is appreciated.
> > -deech
>
> This works for me.  With the point on the first "#" in
>
> > #+BEGIN_SRC c
> > #+END_SRC
>
>
> I get
>
> ,----[C-c C-v I]
> | Lang: c
> | Header Arguments:
> |       :cache          no
> |       :exports        code
> |       :hlines         no
> |       :noweb          yes
> |       :padnewline     yes
> |       :results        replace
> |       :session        none
> |       :tangle         no
> |
> | [back]
> `----
>
> and
>
> ,----[M-: (org-babel-get-src-block-info)]
> | ("c" "" ((:colname-names) (:rowname-names) (:result-params "replace")
> |          (:result-type . value) (:comments . "") (:shebang . "")
> |          (:cache . "no") (:padline . "") (:noweb . "yes") (:tangle .
> "no")
> |          (:exports . "code") (:results . "replace") ...) "" nil 0 882)
> `----
>
> Cheers,
>
> --
> Eric Schulte
> https://cs.unm.edu/~eschulte
> PGP: 0x614CA05D
>

[-- Attachment #2: Type: text/html, Size: 3057 bytes --]