loncom/build/doc_template.pl - diff

Return to doc_template.pl CVS log

Up to [LON-CAPA] / loncom / build

version 1.1, 2002/02/04 14:43:52	version 1.4, 2002/04/23 12:18:47
Line 18 $d=~/\<title.?\>(.?)\<\/title.*?\>/s;	Line 18 $d=~/\<title.?\>(.?)\<\/title.*?\>/s;
my $title=$1;	my $title=$1;
$t=~s/\<TITLE \/\>/$title/g;	$t=~s/\<TITLE \/\>/$title/g;
$d=~/\$(.*?)\$/;	$d=~/\$(.*?)\$/;
my $cvsdate="<i>CVS: $1</i>";	my $e=$1;
	$e=~s/\S\s\S\s+\S*$/ updated by Scott Harrison/;
	my $cvsdate="<font size=\"-2\"><i>CVS $e</i></font>";
$t=~s/\<DATE \/\>/$cvsdate/g;	$t=~s/\<DATE \/\>/$cvsdate/g;
$d=~/\<\!\-\- pdfahref (.*?) \-\-\>/;	$d=~/\<\!\-\- pdfahref (.*?) \-\-\>/;
my $pdfahref="<a href='$1'>";	my $pdfahref="<a href='$1'>";
Line 32 my %bhash=(	Line 34 my %bhash=(
'DOWNLOADS' => '/docs/downloads/index.html',	'DOWNLOADS' => '/docs/downloads/index.html',
'CONTACT' => '/docs/contact/index.html',	'CONTACT' => '/docs/contact/index.html',
'MAIN-SITE' => 'http://install.lon-capa.org',	'MAIN-SITE' => 'http://install.lon-capa.org',
	'LICENSE' => '/docs/license/index.html',
);	);

$d=~/\<\!\-\- button (.*?) \-\-\>/;	$d=~/\<\!\-\- button (.*?) \-\-\>/;