Hello First I should say the footnote-init works great on most files, however it runs into problems when the files in which I want to add footnotes contain structures like [t,y]=ode45(f,[0:(T/600):T],[0.994;0;0;-2.00158510637908252240537862224]) or similar, Below you find 3 files, with the following structure ------------- Contains a copy of the original file --------- Contains the result after a applied fi-add-Footnote-add-footnote (using different styles: numeric, english-upper, english-lower) --------------------- Contains the bugtrace if there is any I always used xemacs -vanilla in order to exclude interference from other programs. Uwe Brauer

Hello First I should say the footnote-init works great on most files, however it runs into problems when the files in which I want to add footnotes contain structures like [t,y]=ode45(f,[0:(T/600):T],[0.994;0;0;-2.00158510637908252240537862224]) or similar, Below you find 3 files, with the following structure ------------- Contains a copy of the original file --------- Contains the result after a applied fi-add-Footnote-add-footnote (using different styles: numeric, english-upper, english-lower) --------------------- Contains the bugtrace if there is any I always used xemacs -vanilla in order to exclude interference from other programs. Uwe Brauer

>>>>> "Andreas" == Andreas Roehler <andreas.roehler(a)online.de&gt; writes: > Footnote mode still is far from perfection. Used > `footnote-init' to work around some bugs, which should > be cured in footnote.el rather. > Added > (defun fi-Footnote-set-latin () > "Set latin style with empty footnote-start- and end-tag. " > (interactive) > (Footnote-set-style 'latin) > (setq footnote-start-tag "") > (setq footnote-end-tag "") > (when (interactive-p) (message "style: %s %s %s" footnote-style (concat "\"" footnote-start-tag "\"") (concat "\"" footnote-end-tag "\"")))) > Setting footnote-start-tag, footnote-end-tag to the > empty string required a patch, as footnote.el assumed > it never nil. > Otherwise latin style too is always provide with > brackets or the like. I just did a quick testing [1]: In the problematic files footnote only works with the sort of clumsy tags and that only works 100 % with (add-hook 'LaTeX-mode-hook 'fi-Footnote-set-my-preferred-tags) etc. Is that to be expected you did you get it to work with the normal tags even for that problematic files?

Uwe Footnotes: [1] and may be I will not have time till monday for more detailed testing.

>>>>> "Andreas" == Andreas Roehler <andreas.roehler(a)online.de&gt; writes: > Uwe Brauer wrote: >> >> Is that to be expected you did you get it to work with the normal tags >> even for that problematic files? > Can't see an easy to use all-at-one solution while storing all > footnote-format info into plain text files. Not a real problem, > You may use any style in just one session, as the footnotes are > remembered > by property then, not by regexp AFAIU. > Starting from the scratch you must not call footnote-init first, > rather plain Footnote-add-footnote. Afterwards footnote-init should > not interfere. > If it interferes, try uncomment > ;; (unless footnote-initialised > and its closing counterpart. > I've reflected a mode, where footnote-init is just called once. > But then you will run into renumbering-bugs from footnote.el > probably. > If you start with a file, which has footnotes inside already, you > can't use the footnote expression elsewhere, it must be unique. > Maybe a solution would be hiding parts of that clumsy tag then? > This will slow down XEmacs probably, as it struggles already with > fontification, outline-mode etc. I thought that may be a more sophisticated regexp search would be able to distinguish [1] from [4:10:12] etc

But after your explanation I see that this seems really complicated and yes a slow down should be avoided, so I prefer that "clumsy" solution

> Sorry so far. > Andreas Thanks again for all your effort. Uwe

>>>>> "Andreas" == Andreas Roehler <andreas.roehler(a)online.de&gt; writes: > Uwe Brauer wrote: >> >> [1] from [4:10:12] etc > Sure it's possible, but hazardous IMHO. In code where [4:10:12] occurs > you can't exclude [1], [2] and so on safely. right > If you can, that's a very specific case. > Well, it was just an example how to write your own function changing > delimiters style. > All you have to care for is to avoid expressions from text. > What about that: > (defun fi-Footnote-set-my-cats-preffered-tags () > "Example function to set footnote-start- and end-tag. " > (interactive) > (setq footnote-start-tag "«") > (setq footnote-end-tag "»") > (when (interactive-p) (message "footnote start end tags: %s %s" > (concat "\"" footnote-start-tag "\"") (concat "\"" footnote-end-tag > "\"")))) That is cool didn't think about it. What do you think about that one [1] (defun my-Footnote-add-footnote (ch) ;Version-1.226 (interactive "c1: add, 2: fi-add, 3:fi-add-comment ") (setq ch (downcase ch)) (call-interactively (cond ((eql ch ?1) #'Footnote-add-footnote) ((eql ch ?2) #'fi-Footnote-add-footnote) ((eql ch ?3) #'fi-Footnote-add-commented-footnote) (t (error 'args-out-of-range '(1 2 3 ch)))))) (defun my-Footnote-change-tags-footnote (ch) ;Version-1.226 (interactive "c1: add, 2: fi-add, 3:fi-add-comment ") (setq ch (downcase ch)) (call-interactively (cond ((eql ch ?1) #'fi-Footnote-restore-default-tags) ((eql ch ?2) #'fi-Footnote-set-my-clumsy-tags) ((eql ch ?3) #'fi-Footnote-set-my-cats-preffered-tags) (t (error 'args-out-of-range '(1 2 3 ch)))))) Uwe

Footnotes: [1] actually that essential parts go back to Steve T