oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

WebGUI 3.5.1 release

Browse source
This commit is contained in:
JT Smith 2002-03-17 18:24:00 +00:00
parent 0df316d3f0
commit 19fa8be10f
9 changed files with 99 additions and 62 deletions
Download patch file Download diff file Expand all files Collapse all files

7
docs/create.sql
View file

@ -1,3 +1,10 @@
create table webguiVersion (
webguiVersion varchar(10),
versionType varchar(30),
dateApplied int
);
insert into webguiVersion values ('3.5.1','intitial install',unix_timestamp());
# MySQL dump 8.14 # MySQL dump 8.14
# #
# Host: localhost Database: WebGUI # Host: localhost Database: WebGUI

101
docs/previousVersion.sql
View file

File diff suppressed because one or more lines are too long

6
docs/upgrades/upgrade_3.5.0-3.5.1.sql Normal file
View file

@ -0,0 +1,6 @@
create table webguiVersion (
webguiVersion varchar(10),
versionType varchar(30),
dateApplied int
);
insert into webguiVersion values ('3.5.1','upgrade',unix_timestamp());

2
lib/WebGUI.pm
View file

@ -1,5 +1,5 @@
package WebGUI; package WebGUI;
our $VERSION = "3.5.0"; our $VERSION = "3.5.1";
#------------------------------------------------------------------- #-------------------------------------------------------------------
# WebGUI is Copyright 2001-2002 Plain Black Software. # WebGUI is Copyright 2001-2002 Plain Black Software.

15
lib/WebGUI/Attachment.pm
View file

@ -98,11 +98,16 @@ sub copy {
$newNode = WebGUI::Node->new($_[1],$_[2]); $newNode = WebGUI::Node->new($_[1],$_[2]);
$a = FileHandle->new($_[0]->getPath,"r"); $a = FileHandle->new($_[0]->getPath,"r");
$b = FileHandle->new(">".$newNode->getPath.'/'.$_[0]->getFilename); $b = FileHandle->new(">".$newNode->getPath.'/'.$_[0]->getFilename);
binmode($a); if (defined $a) {
binmode($b); binmode($a);
cp($a,$b); $b = FileHandle->new(">".$newNode->getPath.'/'.$_[0]->getFilename);
$a->close; if (defined $b) {
$b->close; binmode($b);
cp($a,$b);
$b->close;
}
$a->close;
}
} }

4
lib/WebGUI/Macro/C_crumbTrail.pm
View file

@ -25,7 +25,7 @@ sub _recurseCrumbTrail {
if ($data{pageId} > 1) { if ($data{pageId} > 1) {
$output .= _recurseCrumbTrail($data{parentId},$_[1]); $output .= _recurseCrumbTrail($data{parentId},$_[1]);
} }
if ($data{title} ne "") { if ($data{menuTitle} ne "") {
$output .= '<a class="crumbTrail" href="'.WebGUI::URL::gateway($data{urlizedTitle}) $output .= '<a class="crumbTrail" href="'.WebGUI::URL::gateway($data{urlizedTitle})
.'">'.$data{menuTitle}.'</a>'.$_[1]; .'">'.$data{menuTitle}.'</a>'.$_[1];
} }
@ -42,7 +42,7 @@ sub _replacement {
$delimeter = " ".$param[0]." "; $delimeter = " ".$param[0]." ";
} }
$temp = '<span class="crumbTrail">'._recurseCrumbTrail($session{page}{parentId},$delimeter). $temp = '<span class="crumbTrail">'._recurseCrumbTrail($session{page}{parentId},$delimeter).
'<a href="'.WebGUI::URL::page().'">'.$session{page}{title}.'</a></span>'; '<a href="'.WebGUI::URL::page().'">'.$session{page}{menuTitle}.'</a></span>';
return $temp; return $temp;
} }

8
lib/WebGUI/Style.pm
View file

@ -22,7 +22,7 @@ sub getStyle {
if ($session{form}{makePrintable}) { if ($session{form}{makePrintable}) {
%style = WebGUI::SQL->quickHash("select header,footer,styleSheet from style where styleId=3"); %style = WebGUI::SQL->quickHash("select header,footer,styleSheet from style where styleId=3");
$header = '<html><!-- WebGUI '.$session{wg}{version}.' -->'."\n"; $header = '<html><!-- WebGUI '.$session{wg}{version}.' -->'."\n";
$header .= '<head><title>'.$session{page}{title}.'</title>'; $header .= '<head><title>'.$session{page}{title}.' - '.$session{setting}{companyName}.'</title>';
$header .= $style{styleSheet}.'</head>'.$style{header}; $header .= $style{styleSheet}.'</head>'.$style{header};
$footer = $style{footer}.'</html>'; $footer = $style{footer}.'</html>';
} else { } else {
@ -32,11 +32,7 @@ sub getStyle {
<html> <html>
<head> <head>
<title>'; <title>';
if ($session{page}{pageId} == 1) { $header .= $session{page}{title}.' - '.$session{setting}{companyName};
$header .= $session{setting}{companyName}.' - '.$session{page}{title};
} else {
$header .= $session{page}{title};
}
$header .= '</title>' $header .= '</title>'
.$style{styleSheet} .$style{styleSheet}
.$session{page}{metaTags}; .$session{page}{metaTags};

16
lib/WebGUI/Widget/DownloadManager.pm
View file

@ -542,7 +542,7 @@ sub www_moveDownloadUp {
#------------------------------------------------------------------- #-------------------------------------------------------------------
sub www_view { sub www_view {
my ($url, @row, $i, $p, $search, %data, @test, $file, $alt1, $alt2, $output, $sth, my ($url, @row, $head, $searchForm, $i, $p, $search, %data, @test, $file, $alt1, $alt2, $output, $sth,
%download, $flag, $sort, $sortDirection); %download, $flag, $sort, $sortDirection);
tie %download, 'Tie::CPHash'; tie %download, 'Tie::CPHash';
tie %data, 'Tie::CPHash'; tie %data, 'Tie::CPHash';
@ -555,11 +555,11 @@ sub www_view {
if ($data{description} ne "") { if ($data{description} ne "") {
$output .= $data{description}.'<p>'; $output .= $data{description}.'<p>';
} }
$output .= formHeader(); $searchForm = formHeader();
$output .= WebGUI::Form::text("keyword",20,50); $searchForm .= WebGUI::Form::text("keyword",20,50);
$output .= WebGUI::Form::submit(WebGUI::International::get(170)); $searchForm .= WebGUI::Form::submit(WebGUI::International::get(170));
$output .= '</form>'; $searchForm .= '</form>';
$output .= '<table cellpadding="3" cellspacing="1" border="0" width="100%">'; $head = '<table cellpadding="3" cellspacing="1" border="0" width="100%">';
if ($session{form}{keyword} ne "") { if ($session{form}{keyword} ne "") {
$search = " and (fileTitle like '%".$session{form}{keyword}. $search = " and (fileTitle like '%".$session{form}{keyword}.
"%' or downloadFile like '%".$session{form}{keyword}. "%' or downloadFile like '%".$session{form}{keyword}.
@ -578,7 +578,7 @@ sub www_view {
$sortDirection = $session{form}{sortDirection}; $sortDirection = $session{form}{sortDirection};
$url = WebGUI::URL::append($url,"sortDirection=".$session{form}{sortDirection}); $url = WebGUI::URL::append($url,"sortDirection=".$session{form}{sortDirection});
} }
$output .= '<tr><td class="tableHeader">'. $head .= '<tr><td class="tableHeader">'.
sortByColumn("fileTitle",WebGUI::International::get(14,$namespace)). sortByColumn("fileTitle",WebGUI::International::get(14,$namespace)).
'</td><td class="tableHeader">'. '</td><td class="tableHeader">'.
sortByColumn("briefSynopsis",WebGUI::International::get(15,$namespace)). sortByColumn("briefSynopsis",WebGUI::International::get(15,$namespace)).
@ -633,6 +633,8 @@ sub www_view {
WebGUI::International::get(19,$namespace).'</td></tr>'; WebGUI::International::get(19,$namespace).'</td></tr>';
} }
$p = WebGUI::Paginator->new($url,\@row,$data{paginateAfter}); $p = WebGUI::Paginator->new($url,\@row,$data{paginateAfter});
$output .= $searchForm if ($p->getNumberOfPages > 1);
$output .= $head;
$output .= $p->getPage($session{form}{pn}); $output .= $p->getPage($session{form}{pn});
$output .= '</table>'; $output .= '</table>';
$output .= $p->getBarTraditional($session{form}{pn}); $output .= $p->getBarTraditional($session{form}{pn});

2
lib/WebGUI/Widget/SiteMap.pm
View file

@ -117,7 +117,7 @@ sub www_addSave {
my ($widgetId, $displayTitle, $image, $attachment); my ($widgetId, $displayTitle, $image, $attachment);
if (WebGUI::Privilege::canEditPage()) { if (WebGUI::Privilege::canEditPage()) {
$widgetId = create($session{page}{pageId},$session{form}{widget},$session{form}{title},$session{form}{displayTitle},$session{form}{description},$session{form}{processMacros},$session{form}{templatePosition}); $widgetId = create($session{page}{pageId},$session{form}{widget},$session{form}{title},$session{form}{displayTitle},$session{form}{description},$session{form}{processMacros},$session{form}{templatePosition});
WebGUI::SQL->write("insert into SiteMap values ($widgetId, '$session{form}{startAtThisLevel}', '$session{form}{depth}', '$session{form}{indent}', ".quote($session{form}{bullet}).", '$session{form}{lineSpacing}', '$session{form}{displaySynopsis})"); WebGUI::SQL->write("insert into SiteMap values ($widgetId, '$session{form}{startAtThisLevel}', '$session{form}{depth}', '$session{form}{indent}', ".quote($session{form}{bullet}).", '$session{form}{lineSpacing}', '$session{form}{displaySynopsis}')");
return ""; return "";
} else { } else {
return WebGUI::Privilege::insufficient(); return WebGUI::Privilege::insufficient();