Fix to get sticky due date working

diff --git a/circ/circulation.pl b/circ/circulation.pl
index 5488ece..5668378 100755 (executable)
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -100,6 +100,7 @@ if ($barcode) {
     my ($datedue, $invalidduedate) = fixdate($year, $month, $day);
 
     unless ($invalidduedate) {
+       $env{'datedue'}=$datedue;
        my @time=localtime(time);
        my $date= (1900+$time[5])."-".($time[4]+1)."-".$time[3];
        ($iteminformation, $duedate, $rejected, $question, $questionnumber, $defaultanswer, $message)