Re: [O] Bug?: handling asterisks "*" in HTML export

2011-10-25 Thread Giovanni Ridolfi
Nicolas Goaziou  writes:

>> I found two errors of org while handling asterisks "*" in HTML export.
>> I don't think this is a bug, but I think it is worth to report.
>
> I've pushed a fix in master. Could you confirm that it is working?
>
yes it works,
thanks,

Giovanni



Re: [O] Bug?: handling asterisks "*" in HTML export

2011-10-25 Thread Rainer Stengele
Am 25.10.2011 16:42, schrieb Nicolas Goaziou:
> Hello,
> 
> Giovanni Ridolfi  writes:
> 
>> I found two errors of org while handling asterisks "*" in HTML export.
>> I don't think this is a bug, but I think it is worth to report.
> 
> I've pushed a fix in master. Could you confirm that it is working?
> 
> Please note that single stars, in part 1 and 3, won't appear in the HTML
> output as they are correctly interpreted as empty list items.
> 
> Thanks for reporting this.
> 
> Regards,
> 
Hi Nicolas,

works as expected. Thanks a lot!

Rainer



Re: [O] Bug?: handling asterisks "*" in HTML export

2011-10-25 Thread Nicolas Goaziou
Hello,

Giovanni Ridolfi  writes:

> I found two errors of org while handling asterisks "*" in HTML export.
> I don't think this is a bug, but I think it is worth to report.

I've pushed a fix in master. Could you confirm that it is working?

Please note that single stars, in part 1 and 3, won't appear in the HTML
output as they are correctly interpreted as empty list items.

Thanks for reporting this.

Regards,

-- 
Nicolas Goaziou



Re: [O] Bug?: handling asterisks "*" in HTML export

2011-10-25 Thread Rainer Stengele
I have the same problem

this org file creates the  bug:

* headline
  * test


this doesn't:

* headline
  - test


Best,
Rainer


Am 25.10.2011 15:21, schrieb Giovanni Ridolfi:
> 
> Remember to cover the basics, that is, what you expected to happen and
> what in fact did happen.  You don't know how to make a good report?  See
> 
>  http://orgmode.org/manual/Feedback.html#Feedback
> 
> Your bug report will be posted to the Org-mode mailing list.
> 
> Emacs  : GNU Emacs 23.3.1 (i386-mingw-nt5.1.2600)
>  of 2011-03-10 on 3249CTO
> Package: Org-mode version 7.7 2429e834915a11b58c85f18488976e274d6ce387
> 
> I found two errors of org while handling asterisks "*" in HTML export.
> I don't think this is a bug, but I think it is worth to report.
> 
> I wrote my test.org file (see below). 
> Then I tried to html-export a subtree: 
> 
> C-c @  C-c  C-e B
> 
> and I got the errors:
> 
> (wrong-type-argument stringp nil) or 
> (args-out-of-range [nil nil nil nil nil nil nil nil nil nil nil nil nil nil 
> nil nil nil nil nil nil] -1)
> 
> Before trying to reporduce, please, remember to change the tag ":noexport:"
> e.g. adding a letter :noexporti: "ne eksporti"  ;-)
> so you can export only a section of the file.
> The complete debug trace is under the heading "* backtraces".
> The culprit sholud be " string-match("^ *QUOTE\\( +\\|[   ]*$\\)" nil)".
> 
> cheers,
> Giovanni
> 
>  test.org --
>  -*- mode: org; -*-
> * [2011-10-25 mar] test list asterisk 
> hello
> ** 1 * without space :noexport:
>  *
> hello
> ** test 2 **  without space :noexport:
>  **
> I found a bug? an error?
> ** test 3: *  with a space :noexporti:
>  * 
> newline
> 
> * backtraces
> 
> ** backtrace 1 
> Debugger entered--Lisp error: (wrong-type-argument stringp nil)
>   string-match("^ *QUOTE\\( +\\|[ ]*$\\)" nil)
>   (if (string-match quote-re0 txt) (setq txt (replace-match "" t t txt)))
>   (cond ((string-match "\\(\\*+\\)\\(?: +\\(.*?\\)\\)?[   ]*$" line) 
> (setq level ... txt ...) (if ... ...) (if ... ...) (setq first-heading-pos 
> ...) (org-html-level-start level txt umax ... head-count opt-plist) (when ... 
> ... ... ...)) ((and org-export-with-tables ...) (when ... ...) (setq 
> table-buffer ... table-orig-buffer ...) (when ... ... ... ...)) (t (when ... 
> ...) (when ... ... ...) (if ... ...) (when org-export-with-footnotes ... ...) 
> (cond ... ...) (let ... ...) (insert line "\n")))
>   (catch (quote nextline) (when (and inquote ...) (insert "\n") 
> (org-open-par) (setq inquote nil)) (when inquote (insert ... "\n") (throw ... 
> nil)) (when (and org-export-with-fixed-width ...) (when ... ... ... ...) 
> (insert ... "\n") (when ... ... ... ...) (throw ... nil)) (when (and ... ...) 
> (let ... ... ... ... ...) (throw ... nil)) (when (equal 
> "ORG-BLOCKQUOTE-START" line) (org-close-par-maybe) (insert "\n") 
> (org-open-par) (throw ... nil)) (when (equal "ORG-BLOCKQUOTE-END" line) 
> (org-close-par-maybe) (insert "\n\n") (org-open-par) (throw ... 
> nil)) (when (equal "ORG-VERSE-START" line) (org-close-par-maybe) (insert 
> "\n\n") (setq org-par-open t) (setq inverse t) (throw ... 
> nil)) (when (equal "ORG-VERSE-END" line) (insert "\n") (setq org-par-open 
> nil) (org-open-par) (setq inverse nil) (throw ... nil)) (when (equal 
> "ORG-CENTER-START" line) (org-close-par-maybe) (insert "\n style=\"text-align: center\">") (org-open-par)
 (throw ... nil)) (when (equal "ORG-CENTER-END" line) (org-close-par-maybe) 
(insert "\n") (org-open-par) (throw ... nil)) (run-hooks (quote 
org-export-html-after-blockquotes-hook)) (when inverse (let ... ... ...)) (setq 
start 0) (while (string-match "<<]*\\)>>>?\\((INVISIBLE)\\)?[
]*\n?" line start) (cond ... ... ... ...)) (setq line 
(org-html-handle-time-stamps line)) (or (string-match org-table-hline-regexp 
line) (string-match "^[  ]*\\([+]-\\||[ ]\\)[-+ |]*[+|][ ]*$" line) 
(setq line ...)) (setq line (org-html-handle-links line opt-plist)) (if (and 
org-todo-line-regexp ... ...) (setq line ...)) (when org-export-with-footnotes 
(setq start 0) (while ... ...)) (cond (... ... ... ... ... ... ...) (... ... 
... ...) (t ... ... ... ... ... ... ...)))
>   (while (setq line (pop lines) origline line) (catch (quote nextline) (when 
> ... ... ... ...) (when inquote ... ...) (when ... ... ... ... ...) (when ... 
> ... ...) (when ... ... ... ... ...) (when ... ... ... ... ...) (when ... ... 
> ... ... ... ...) (when ... ... ... ... ... ...) (when ... ... ... ... ...) 
> (when ... ... ... ... ...) (run-hooks ...) (when inverse ...) (setq start 0) 
> (while ... ...) (setq line ...) (or ... ... ...) (setq line ...) (if ... ...) 
> (when org-export-with-footnotes ... ...) (cond ... ... ...)))
>   (let ((case-fold-search nil) (org-odd-levels-only odd)) (mapc (lambda ... 
> ...) org-export-plist-vars) (setq umax (if arg ... 
> org-export-headline-levels)) (setq umax-toc (if ... ... umax)) (un