Minor bugfix

This commit is contained in:
Leendert Bottelberghs 2004-08-13 15:25:02 +00:00
parent 988c37a18f
commit 93a9a5ec43

View file

@ -376,7 +376,7 @@ sub getWobjectByCriteria {
}
my $wid;
# Grab a wid from the results
if ($order = 'random') {
if ($order == 'random') {
$wid = $wids[ rand @wids ];
} else {
#default order is mostRecent