diff --git a/docs/changelog/6.x.x.txt b/docs/changelog/6.x.x.txt index 22c75c907..267f6ed12 100644 --- a/docs/changelog/6.x.x.txt +++ b/docs/changelog/6.x.x.txt @@ -24,6 +24,7 @@ page. - Added a context menu to the last item in the crumb trail in the asset manager as discussed in Community IRC. + - Login boxes are now Section 508 compliant. 6.99.1 - Bugfixes on dashboard to fix template errors. diff --git a/docs/upgrades/_upgrade.skeleton b/docs/upgrades/_upgrade.skeleton index 683533b32..e13a7b7d9 100644 --- a/docs/upgrades/_upgrade.skeleton +++ b/docs/upgrades/_upgrade.skeleton @@ -49,6 +49,7 @@ sub start { my $versionTag = WebGUI::VersionTag->getWorking($session); $versionTag->set({name=>"Upgrade to ".$toVersion}); $session->db->write("insert into webguiVersion values (".$session->db->quote($toVersion).",'upgrade',".$session->datetime->time().")"); + updateTemplates($session); return $session; } @@ -60,3 +61,65 @@ sub finish { $session->close(); } +#------------------------------------------------- +sub updateTemplates { + my $session = shift; + return undef unless (-d "templates-".$toVersion); + print "\tUpdating templates.\n" unless ($quiet); + opendir(DIR,"templates-".$toVersion); + my @files = readdir(DIR); + closedir(DIR); + my $importNode = WebGUI::Asset->getImportNode($session); + my $newFolder = undef; + foreach my $file (@files) { + next unless ($file =~ /\.tmpl$/); + open(FILE,""WebGUI::Asset::Template"); + while (my $line = ) { + if ($first) { + $line =~ m/^\#(.*)$/; + $properties{id} = $1; + $first = 0; + } elsif ($line =~ m/^\#create$/) { + $create = 1; + } elsif ($line =~ m/^\#(.*):(.*)$/) { + $properties{$1} = $2; + } elsif ($line =~ m/^~~~$/) { + $head = 1; + } elsif ($head) { + $properties{headBlock} .= $line; + } else { + $properties{template} .= $line; + } + } + close(FILE); + if ($create) { + $newFolder = createNewTemplatesFolder($importNode) unless (defined $newFolder); + my $template = $newFolder->addChild(\%properties, $properties{id}); + } else { + my $template = WebGUI::Asset->new($session,$properties{id}, "WebGUI::Asset::Template"); + if (defined $template) { + my $newRevision = $template->addRevision(\%properties); + } + } + } +} + +#------------------------------------------------- +sub createNewTemplatesFolder { + my $importNode = shift; + my $newFolder = $importNode->addChild({ + className=>"WebGUI::Asset::Wobject::Folder", + title => $toVersion." New Templates", + menuTitle => $toVersion." New Templates", + url=> $toVersion."_new_templates", + groupIdView=>"12" + }); + return $newFolder; +} + + + diff --git a/docs/upgrades/templates-6.99.2/loginbox1.tmpl b/docs/upgrades/templates-6.99.2/loginbox1.tmpl new file mode 100644 index 000000000..f05ba09ea --- /dev/null +++ b/docs/upgrades/templates-6.99.2/loginbox1.tmpl @@ -0,0 +1,23 @@ +#PBtmpl0000000000000044 +
+ + +
+
+
+
+ + + +

+
+ + + . + + + + +
+
+ diff --git a/docs/upgrades/templates-6.99.2/loginbox2.tmpl b/docs/upgrades/templates-6.99.2/loginbox2.tmpl new file mode 100644 index 000000000..f40e1830b --- /dev/null +++ b/docs/upgrades/templates-6.99.2/loginbox2.tmpl @@ -0,0 +1,28 @@ +#PBtmpl0000000000000092 +
+ + + + + + + + + + + + + +
+ + + + + . + + +
+
+
+
+ diff --git a/docs/upgrades/templates-6.99.2/wgtemplate_default_pm_project_display.tmpl b/docs/upgrades/templates-6.99.2/wgtemplate_default_pm_project_display.tmpl index 28ceec071..53b55f757 100644 --- a/docs/upgrades/templates-6.99.2/wgtemplate_default_pm_project_display.tmpl +++ b/docs/upgrades/templates-6.99.2/wgtemplate_default_pm_project_display.tmpl @@ -1,9 +1,4 @@ #ProjectManagerTMPL0002 -#title:Default Project Display -#menuTitle:Default Project Display -#url:default-pm-template-project-display -#namespace:ProjectManager_project -#create