--- parser3/www/htdocs/Attic/_bug.html 2004/02/26 14:37:31 1.11
+++ parser3/www/htdocs/Attic/_bug.html 2004/12/23 15:36:12 1.76
@@ -1,6 +1,8 @@
-@main[]
-$file[^file::load[text;_bug.p]]
-^process[$self]{$file.text}[
- $.file[$file.name]
- $.lineno(-1)
-]
+^connect[$SQL.connect-string]{
+ $f[^file::sql{select 2*2, 'this is name.doc', 'app/paf'}[
+# $.name[that is name.zip]
+ $.content-type[app/pif]
+ ]]
+ $f.name
+ $f.content-type
+}
\ No newline at end of file