Diff for /parser3/src/www/htdocs/Attic/auto.p between versions 1.17 and 1.37

version 1.17, 2001/04/26 11:37:48 version 1.37, 2001/09/13 14:10:54
Line 1 Line 1
 @auto[]  @postprocess[body]
 $user-html[^table:set{user      html    comment  $src[^dom::set{$body}]
 <<      &laquo^;        длинные user вперёд  $dst[^src.xslt[global.xsl;$.param1(^default($form:param1;0))]]
 >>      &raquo^;  $response:body[^dst.file[
 \n\n    <p>     !эти есть в таблице по умолчанию          $.encoding[windows-1251]
 \n      <br>    !но т.к. заменяем, надо повторить.          $.method[html]
 <       &lt^;   !можно этим воспользоваться,  ]]
 >       &gt^;   !и что-то сделать ДО обычных замен  
 "       &quot^; !например из << и >>  
 &       &amp^;  !сделать ёлочки-кавычки.  
 _       &nbsp^;  
 ^#AB    &laquo^;        windows коды ёлочек  
 ^#BB    &raquo^;        windows коды ёлочек  
 (c)     &copy^;  
 ^#A9    &copy^; windows (c)  
 }]  
 $SQL.connect-string[mysql://test:test@localhost/test/cp1251_koi8]  
 #for ^file:load[name;user-name;mime-type << autodetection]  
 $MIME-TYPES[^table:set{ext      mime-type  
 zip     application/zip  
 doc     application/msword  
 xls     application/vnd.ms-excel  
 pdf     application/pdf  
 ppt     application/powerpoint  
 rtf     application/rtf  
 gif     image/gif  
 jpg     image/jpeg  
 png     image/png  
 tif     image/tiff  
 html    text/html  
 htm     text/html  
 txt     text/plain  
 mts     application/metastream  
 mid     audio/midi  
 midi    audio/midi  
 mp3     audio/mpeg  
 ram     audio/x-pn-realaudio  
 rpm     audio/x-pn-realaudio-plugin  
 ra      audio/x-realaudio  
 wav     audio/x-wav  
 au      audio/basic  
 mpg     video/mpeg  
 avi     video/x-msvideo  
 mov     video/quicktime  
 swf     application/x-shockwave-flash  
 }]  
   
 @auto_test[]  
 ^BASE.auto_test[]  
 <li>DR  
   
   @default[val;deflt][v]
   $v[$val]^if(def $v){$v}{$deflt}

Removed from v.1.17  
changed lines
  Added in v.1.37


E-mail: