LDP
/
LDP
mirror of https://github.com/tLDP/LDP
0
1
Fork 0
Code Releases Activity

wiki field in db, escape ampersands in xml

This commit is contained in:
david 2002-01-13 17:58:33 +00:00
parent 246923ed65
commit 2c019c40d4
2 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
LDP/database/omf.pl
View File

@ -21,6 +21,7 @@ print '<omf>' . "\n";
while (@row = $doc->fetchrow) {
$doc_id = $row[0];
$title = $row[1];
$title =~ s/\&/\&amp;/;
$pub_status_name = $row[2];
$class = $row[3];
$class =~ s/\s+$//;
@ -42,6 +43,7 @@ while (@row = $doc->fetchrow) {
$version =~ s/\s+$//;
$abstract = $row[15];
$abstract =~ s/\s+$//;
$abstract =~ s/\&/\&amp;/;
print "<resource id='$doc_id'>\n";
@ -51,6 +53,7 @@ while (@row = $doc->fetchrow) {
die $conn->errorMessage unless PGRES_TUPLES_OK eq $maintainer->resultStatus;
while (@maintainer_row = $maintainer->fetchrow) {
$maintainer_name = $maintainer_row[0];
$maintainer_name =~ s/\&/\&amp;/;
$maintainer_email = $maintainer_row[1];
print " <creator>$maintainer_email ($maintainer_name)</creator>\n";
}
@ -61,6 +64,7 @@ while (@row = $doc->fetchrow) {
die $conn->errorMessage unless PGRES_TUPLES_OK eq $maintainer->resultStatus;
while (@maintainer_row = $maintainer->fetchrow) {
$maintainer_name = $maintainer_row[0];
$maintainer_name =~ s/\&/\&amp;/;
$maintainer_email = $maintainer_row[1];
print " <maintainer>$maintainer_email ($maintainer_name)</maintainer>\n";
}
@ -71,6 +75,7 @@ while (@row = $doc->fetchrow) {
die $conn->errorMessage unless PGRES_TUPLES_OK eq $maintainer->resultStatus;
while (@maintainer_row = $maintainer->fetchrow) {
$maintainer_name = $maintainer_row[0];
$maintainer_name =~ s/\&/\&amp;/;
$maintainer_email = $maintainer_row[1];
print " <contributor>$maintainer_email ($maintainer_name)</contributor>\n";
}

1
LDP/lampadas/database/document.sql
View File

@ -24,6 +24,7 @@ CREATE TABLE document
license_id INT4,
license CHAR(12),
abstract TEXT,
wiki TEXT,
PRIMARY KEY (doc_id)
);