Re: Bug: org-preview-latex-fragment-region fails [7.8.03] [Xemacs 21.5.31 Mule]

[Uwe Brauer <oub@mat.ucm.es>]

>> On Fri, 25 May 2012 23:19:52 +0200, Bastien <bzg@gnu.org> wrote:
Hi Bastien,

   > I don't see any backtrace, did you forgot to attached it?


This is very odd, I just checked my outgoing mail (I have a
copy in gmail) and there I can see the backtrace in form of
an attachment, while indeed when I read my email in gmane I
cannot see it. 

Is there any filter on the mailing list which
removes attachment?? That would be good to know for the
future.

I resend the backtrace  at the end of the message
but not an attachment.

   > In any case, I don't use XEmacs so please send a patch
   > for this if you can.
Yes I know :'(  however I thought it might be one of these
standard incompatiblies between GNU emacs and Xemacs. In any
case meanwhile I found a workaround, it is however an ugly
kludge. (I have to replace 
(narrow-to-region beg end)
by (narrow-to-region (point) (mark)), that is rather odd.
I also still use 7.8.03; would that  be problem concerning a
patch?


Just one question more: I see in the function 
org-preview-latex-fragment-region various `setq'
I thought one should use `let' instead; anyhow.

Uwe 

,----
|  Debugger entered--Lisp error: (wrong-type-argument integer-or-marker-p nil)
|    apply(debug error (wrong-type-argument integer-or-marker-p nil))
|    edebug(error (wrong-type-argument integer-or-marker-p nil))
|    narrow-to-region(nil nil)
|    (edebug-after (edebug-before 55) 58 (narrow-to-region
|    (edebug-after 0 56 beg) (edebug-after 0 57 end))) 
|    (let (beg end at msg) (edebug-after (edebug-before 5) 51
|    (cond ... ... ...)) (edebug-after (edebug-before 52) 54
|    (message ... "")) (edebug-after (edebug-before 55) 58
|    (narrow-to-region ... ...)) (edebug-after (edebug-before
|    59) 61 (goto-char ...)) (edebug-after (edebug-before 62)
|    73 (org-format-latex ... ... ... ... ... ... ...))
|    (edebug-after (edebug-before 74) 76 (message ... "done.
|    Use `C-c C-c' to remove images."))) 
|    (edebug-after (edebug-before 4) 77 (let (beg end at msg)
|    (edebug-after ... 51 ...) (edebug-after ... 54 ...)
|    (edebug-after ... 58 ...) (edebug-after ... 61 ...)
|    (edebug-after ... 73 ...) (edebug-after ... 76 ...))) 
|    (save-restriction (edebug-after (edebug-before 4) 77 (let
|    ... ... ... ... ... ... ...))) 
|    (edebug-after (edebug-before 3) 78 (save-restriction
|    (edebug-after ... 77 ...))) 
|    (save-excursion (edebug-after (edebug-before 3) 78
|    (save-restriction ...))) 
|    (edebug-after (edebug-before 2) 79 (save-excursion
|    (edebug-after ... 78 ...))) 
|    (lambda nil (edebug-after (edebug-before 0) 1
|    (org-remove-latex-fragment-image-overlays)) (edebug-after
|    (edebug-before 2) 79 (save-excursion ...)))() 
|    edebug-enter(org-preview-latex-fragment-region (1 9 nil)
|    (lambda nil (edebug-after (edebug-before 0) 1
|    (org-remove-latex-fragment-image-overlays)) (edebug-after
|    (edebug-before 2) 79 (save-excursion ...)))) 
|    edebug-enter(org-preview-latex-fragment-region (1 9 nil)
|    (lambda nil (edebug-after (edebug-before 0) 1
|    (org-remove-latex-fragment-image-overlays)) (edebug-after
|    (edebug-before 2) 79 (save-excursion ...)))) 
|    org-preview-latex-fragment-region(1 9)
|    call-interactively(org-preview-latex-fragment-region)
|    command-execute(org-preview-latex-fragment-region t)
|    execute-extended-command(nil)
|    call-interactively(execute-extended-command)
|    recursive-edit()
|    byte-code("..." [buffer-read-only noninteractive
|    debugger-buffer middlestart debugger-args
|    debugger-batch-max-lines pop-to-buffer debugger-mode
|    debugger-setup-buffer count-lines 2 "...\n" message
|    buffer-string kill-emacs debug backtrace-debug 3 t
|    debugger-reenable "" nil recursive-edit standard-output]
|    3) 
|    debug(error (wrong-type-argument integer-or-marker-p nil))
|    org-preview-latex-fragment-region(1855 1873)
|    call-interactively(org-preview-latex-fragment-region)
|    command-execute(org-preview-latex-fragment-region t)
|    execute-extended-command(nil)
|    call-interactively(execute-extended-command)
`----