X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/a74031056eda7ea2929d769df3692324ad18e503..0faee73dd1ca40f8dbf9f12ec7b67bbeb6575fc1:/SL/User.pm

diff --git a/SL/User.pm b/SL/User.pm
index e936023d7..ae61fd262 100644
--- a/SL/User.pm
+++ b/SL/User.pm
@@ -524,7 +524,8 @@ sub process_query {
              $dbh->quote($version_or_control->{"tag"}) . ", " .
              $dbh->quote($form->{"login"}) . ")");
   } elsif ($version_or_control) {
-    $dbh->do("UPDATE defaults SET version = " . $dbh->quote($version));
+    $dbh->do("UPDATE defaults SET version = " .
+             $dbh->quote($version_or_control));
   }
   $dbh->commit();