Re: ExecuteMetaData with [ ] instead of { }

[Uwe Brauer]

>>> "AE" == Arash Esbati <arash@gnu.org> writes:

> Uwe Brauer <oub@mat.ucm.es> writes:
>> Well
>> 
>> (defun my-catch-counter-inc ()
>> "Increment `my-catch-counter' and return the new value."
>> (when (= my-catch-counter 0)
>> (save-excursion
>> (goto-char (point-min))
>> (while (re-search-forward (concat "^\\%<\\*\\(" my-catch-chars "*?\\)>$")

> Wouldn't it be easier to write the regexp above like this:

>     "%<\\*\\([^>]+\\)>$"

Ah, I am actually quite bad with regexp.

I tried the reg-builder or rx but even cannot deal with these.

I give it a try 
>> (point-max) t)
>> (let ((fn (string-to-number (match-string 1))))
>> (when (> fn my-catch-counter)
>> (setq my-catch-counter fn))))))
>> (setq my-catch-counter (1+my-catch-counter)))
>                               ^

> Does this version throws an error?  There is a space missing after `1+':

Arg, I tried 

1 + my-catch-counter
And 
1+my-catch-counter

Your solution did not occur to me. I give it a try.

BTW, I need to resend the patch, besides your changes I forgot the entry in the 
Makefile.in


Uwe

smime.p7s
Description: S/MIME cryptographic signature