Ulf Jasper <[EMAIL PROTECTED]> writes:
> On Friday, 27 October 2006, 19:32 +0200, Adrian Aichner wrote:
>> I have sent the patch to Ulf via the email contact provided at
>> http://de.geocities.com/ulf_jasper/index.html
>> but have not heard back.
>>
>> Does anyone know whether Ulf is still maintaining aforementioned
>> packages?
>
> Yes, I know. He is! ;)
Das ist schön!
>
> I haven't received your mail. At least I haven't seen it. Maybe
> my spam filter did something wrong. Please send it again!
I'm glad I have nnir working.
Here is the patch as part of the original mail again, for the optimization of
your Spam filter :-)
From: Adrian Aichner <[EMAIL PROTECTED]>
Subject: Patch for csv.el
To: [EMAIL PROTECTED]
Date: Sun, 08 Oct 2006 18:15:11 +0200
Organization: The XEmacs Project
Message-ID: <[EMAIL PROTECTED]>
Xref: TANG xemacs:45755
Hello Ulf,
I looked into lookout.el over the weekend.
Here is a patch I came up with to make csv.el handle my actual outlook
csv data file.
I get them both from
http://de.geocities.com/ulf_jasper/lisp/
Would be great if you could include this patch.
\\\\\"
should probably be excluded from regexps.
I think this is incorrect " escaping syntax for CSV format, which is
actually down by doubling, as in
"this is an ""embedded string""inside of a CSV field".
Thanks in advance!
Adrian
CahngeLog entry (if needed):
2006-10-08 Adrian Aichner <[EMAIL PROTECTED]>
* csv.el (csv-read-line): Handle empty fields and begin of line by
conditioning regexps on index. Handle embedded double-quotes,
which are actually escaped by doubling them, by extending regexps.
Unified Diff Patch:
diff -u c:\Program Files\XEmacs\site-packages\lisp\csv.el.~1~ c:\Program
Files\XEmacs\site-packages\lisp\csv.el
--- c:\Program Files\XEmacs\site-packages\lisp\csv.el.~1~ 2006-10-08
18:07:17.734375000 +0200
+++ c:\Program Files\XEmacs\site-packages\lisp\csv.el 2006-10-08
18:07:17.734375000 +0200
@@ -105,14 +105,19 @@
;; try for quoted entry
(save-excursion
(when (re-search-forward
- "\\(^\\|,\\)\"\\(\\([^\"]\\|\n\\|\\\\\"\\)*\\)\"\\(,\\|,?$\\)"
+ (if (> index 0)
+
"\\(,\\)\"\\(\\([^\"]\\|\n\\|\"\"\\|\\\\\"\\)*\\)\"\\(,\\|,?$\\)"
+
"\\(^\\)\"\\(\\([^\"]\\|\n\\|\"\"\\|\\\\\"\\)*\\)\"\\(,\\|,?$\\)")
nil t)
(setq matchstart1 (match-beginning 0))
(setq matchend1 (+ 1 (match-end 2)))
(setq match1 (match-string 2))))
;; try unquoted
(save-excursion
- (when (re-search-forward "\\(^\\|,\\)\\([^,\n]*\\)\\(,\\|,?$\\)"
+ (when (re-search-forward
+ (if (> index 0)
+ "\\(,\\)\\([^,\n]*\\)\\(,\\|,?$\\)"
+ "\\(^\\)\\([^,\n]*\\)\\(,\\|,?$\\)")
nil t)
(setq matchstart2 (match-beginning 0))
(setq matchend2 (match-end 2))
--
Adrian Aichner
mailto:[EMAIL PROTECTED]
http://www.xemacs.org/
>
> Cheers,
>
> ulf
>
>
--
Adrian Aichner
mailto:[EMAIL PROTECTED]
http://www.xemacs.org/
-------------------------------------------------------------------------
Using Tomcat but need to do more? Need to support web services, security?
Get stuff done quickly with pre-integrated technology to make your job easier
Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
http://sel.as-us.falkag.net/sel?cmd=lnk&kid=120709&bid=263057&dat=121642
_______________________________________________
bbdb-info@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/bbdb-info
BBDB Home Page: http://bbdb.sourceforge.net/
