Diff for /parser3/src/www/htdocs/Attic/auto.p between versions 1.14 and 1.30

version 1.14, 2001/04/17 19:01:04 version 1.30, 2001/07/26 16:16:57
Line 1 Line 1
 @auto[]  @auto[]
 $LIMITS[  $limits[
         $post_max_size(10*0x400*0x400)          $.post_max_size(10*0x400*0x400)
 ]         ]       
 $DEFAULTS[  $defaults[
         $content-type0[text/html]          $.content-type0[text/html]
         $content-type[          $.content-type[
                 $value[text/html]                  $.value[text/html]
                 $charset[windows-1251]                  $.charset[windows-1251]
         ]          ]
 ]  ]
 $LOCALE[  
 #for ^match{}[i]  
         $ctype[Russian_Russia.1251]  
 ]  
 $SQL[  $SQL[
         $connect-string[mysql://test:test@localhost/test/cp1251_koi8]          $.drivers[^table::set{protocol  driver  client
         $drivers[^table:set{protocol    driver  client  mysql   d:\Y\parser3\src\sql\mysql\debug\parser3mysql.dll       d:\y\parser3\src\sql\mysql\mySQL32\lib\opt\libmySQL.dll
 mysql   Y:\parser3\src\sql\mysql\Debug\parser3mysql.dll Y:\parser3\src\sql\mysql\mySQL32\lib\opt\libmySQL.dll  odbc    d:\y\parser3\src\sql\odbc\Debug\parser3odbc.dll
 }]  }]
 ]  ]
 $MAIL[  
         $SMTP[mail.office.design.ru]  #$ORIGINS(1)
 #       $prog1[/usr/sbin/sendmail -t]  $user-html[^table::set{user     html    comment
 #       $prog2[/usr/lib/sendmail -t]  <<      &laquo^;        длинные user вперёд
 ]  >>      &raquo^;
 #for ^file:load[name;user-name;mime-type << autodetection]  \n\n    <p>     !эти есть в таблице по умолчанию
 $MIME-TYPES[^table:set{ext      mime-type  \n      <br>    !но т.к. заменяем, надо повторить.
   <       &lt^;   !можно этим воспользоваться,
   >       &gt^;   !и что-то сделать ДО обычных замен
   "       &quot^; !например из << и >>
   &       &amp^;  !сделать ёлочки-кавычки.
   _       &nbsp^;
   ^#AB    &laquo^;        windows коды ёлочек
   ^#BB    &raquo^;        windows коды ёлочек
   (c)     &copy^;
   ^#A9    &copy^; windows (c)
   }]
   
   
   #for ^file::load[name;user-name;mime-type << autodetection]
   $MIME-TYPES[^table::set{ext     mime-type
 zip     application/zip  zip     application/zip
 doc     application/msword  doc     application/msword
 xls     application/vnd.ms-excel  xls     application/vnd.ms-excel
Line 54  mov video/quicktime Line 65  mov video/quicktime
 swf     application/x-shockwave-flash  swf     application/x-shockwave-flash
 }]  }]
   
 @auto_test[]  @exception[origin;source;comment;type;code]
 ^BASE.auto_test[]  ROOT_ERROR:
 <li>DR  ^if(def $source){$origin '$source'}
   ${comment}.
   ^if(def $type){type=$type}
   ^if(def $code){code=$code}

Removed from v.1.14  
changed lines
  Added in v.1.30


E-mail: