first round of changes to create the ui for building workflows, more to come

a few small bug fixes
This commit is contained in:
JT Smith 2006-02-15 21:23:22 +00:00
parent 18e24618e7
commit 6ee05b85af
12 changed files with 441 additions and 26 deletions

View file

@ -65,8 +65,8 @@ sub create {
my $class = shift;
my $session = shift;
my $workflowId = shift;
my $classname = shift;
my $id = shift;
my $classname = shift;
my ($sequenceNumber) = $session->db->quickArray("select count(*) from WorkflowActivity where workflowId=?", [$workflowId]);
$sequenceNumber++;
my $activityId = $session->db->setRow("WorkflowActivity","activityId", {
@ -196,7 +196,6 @@ sub getType {
return "none";
}
#-------------------------------------------------------------------
=head2 new ( session, activityId [, classname] )