Allow a redirect to be sent to the user that cannot be calculated when creating the Fork object. This is useful for Forks that build files to be downloaded.

docs/upgrades/upgrade_7.10.23-7.10.24.pl

@@ -32,6 +32,7 @@ my $session = start(); # this line required
 
 # upgrade functions go here
 addPALastLogTable($session);
+addForkRedirect($session);
 
 finish($session); # this line required
 
@@ -55,6 +56,18 @@ EOSQL
     print "DONE!\n" unless $quiet;
 }
 
+#----------------------------------------------------------------------------
+# Describe what our function does
+sub addForkRedirect {
+    my $session = shift;
+    print "\tAdd a column to Fork to keep track of late generated redirect URLs... " unless $quiet;
+    # and here's our code
+    $session->db->write(<<EOSQL);
+ALTER TABLE Fork add column redirect CHAR(255);
+EOSQL
+    print "DONE!\n" unless $quiet;
+}
+
 #----------------------------------------------------------------------------
 # Describe what our function does
 #sub exampleFunction {