db/prgsrc/db.cgi - diff

Return to db.cgi CVS log

Up to [Local Repository] / db / prgsrc

version 1.154, 2010/01/10 17:11:23	version 1.156, 2010/01/10 19:19:44
Line 1389 sub PrintField {	Line 1389 sub PrintField {
if $value !~ /^\\|/;	if $value !~ /^\\|/;
$value =~ s/^\\|([^\n]*)/<pre>$1<\/pre>/mg;	$value =~ s/^\\|([^\n]*)/<pre>$1<\/pre>/mg;

$value =~ s/(http:\/\/\S+[^\s\)\(\,\.])/a({href=>escapeUrl($1)},$1)/egm if $header !~ /^Авто/;#!!!	$value =~ s/(http:\/\/\S+[^\s\)\(\,\.\]])/a({href=>escapeUrl($1)},$1)/egm if $header !~ /^Авто/;#!!!

$value =~ s/\[Раздаточный материал:(.*?)\]/<div class='razdatka'><div class='razdatka_header'>Раздаточный материал<\/div> $1<\/div>/sm;	$value =~ s/\.\.\.\]/!!!ZAKR!!!/g;
	$value =~ s/пропущено\]/!!!PROP!!!/g;
	$value =~ s/пропущены\]/!!!PROP2!!!/g;
	$value =~ s/\[Раздаточный материал:(.?)\]\s\n/<div class='razdatka'><div class='razdatka_header'>Раздаточный материал<\/div> $1<\/div>\n$2/sm;
	$value =~ s/!!!ZAKR!!!/\.\.\.\]/g;
	$value =~ s/!!!PROP2!!!/пропущены\]/g;


# $value =~ s/(http:\/\/\S+[^\s\)\(\,\.])/make/eg if $header !~ /^Авто/;#!!!	# $value =~ s/(http:\/\/\S+[^\s\)\(\,\.])/make/eg if $header !~ /^Авто/;#!!!