add: Calendar can now choose workflow for Events

fix: Event now saves ownerUserId correctly
add: GalleryAlbum now shows link to add a Photo
added a test skeleton for Test::WWW::Mechanize tests
This commit is contained in:
Doug Bell 2008-04-16 23:32:12 +00:00
parent 684ce5a7ca
commit 7668f68980
13 changed files with 533 additions and 15 deletions

View file

@ -28,6 +28,7 @@ finish($session); # this line required
#----------------------------------------------------------------------------
# Describe what our function does
#sub exampleFunction {
# my $session = shift;
# print "\tWe're doing some stuff here that you should know about... " unless $quiet;

View file

@ -23,11 +23,13 @@ my $quiet; # this line required
my $session = start(); # this line required
# upgrade functions go here
addCalendarEventWorkflow( $session );
finish($session); # this line required
#----------------------------------------------------------------------------
# Describe what our function does
#sub exampleFunction {
# my $session = shift;
# print "\tWe're doing some stuff here that you should know about... " unless $quiet;
@ -35,6 +37,25 @@ finish($session); # this line required
# print "DONE!\n" unless $quiet;
#}
#----------------------------------------------------------------------------
# Add the database column to select the workflow to approve Calendar Events
sub addCalendarEventWorkflow {
my $session = shift;
print "\tAdding Calendar Event Workflow field..." unless $quiet;
$session->db->write(
qq{ ALTER TABLE Calendar ADD COLUMN workflowIdCommit VARCHAR(22) BINARY },
);
# Add a nice default value
$session->db->write(
qq{ UPDATE Calendar SET workflowIdCommit = ? },
[ $session->setting->get('defaultVersionTagWorkflow') ],
);
print "DONE!\n" unless $quiet;
}
# -------------- DO NOT EDIT BELOW THIS LINE --------------------------------