X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FQSL.pm;h=abb8b86cf6a771e850f1532195b3fef246144146;hb=db4b52547dcfe1b83ce865aeb2c53a0ad68acdb3;hp=c1beca63dd2f2dfbaa3bd24661304d4e68cba1cf;hpb=bab0eedc7cdb3ddb73d1afef0a2de2ce4456107f;p=spider.git

diff --git a/perl/QSL.pm b/perl/QSL.pm
index c1beca63..abb8b86c 100644
--- a/perl/QSL.pm
+++ b/perl/QSL.pm
@@ -80,7 +80,7 @@ sub update
 			}
 		} else {
 			$r = [$man, 1, $t, $by];
-			push @{$self->[1]}, $r;
+			unshift @{$self->[1]}, $r;
 		}
 	}
 	$self->put;