use the entire password as the seed when encrypting it, since some crypt() routines no longer use only the first two characters

webtools/despot/utils.pl

@@ -55,7 +55,7 @@ sub cryptit {
 
 sub checkpassword {
     my ($plain, $encrypted) = (@_);
-    return $encrypted eq crypt($plain, substr($encrypted, 0, 2));
+    return $encrypted eq crypt($plain, $encrypted);
 }