diff --git a/scripts/prt-auf b/scripts/prt-auf
index 3ca030a..5d00682 100755
--- a/scripts/prt-auf
+++ b/scripts/prt-auf
@@ -143,7 +143,7 @@ if (($action =~ /^(listinst|listorphans)/)
   my @failures = grep { $removed{$_}==0 } keys %removed;
   print "Ports removed:\n" if (@successes);
   foreach my $p (@successes) { print "$p\n"; }
-} elsif ($action =~ /^(install|update|depinst|grpinst)$/) {
+} elsif ($action =~ /^(install|update|depinst|grpinst|sysup)$/) {
   my @ok = @{$results[0]}; my @ok_pre = @{$results[1]}; my @ok_post = @{$results[2]};
   my @ok_readme = @{$results[3]}; my @not_ok = @{$results[4]}; my $note;
   if (($opkg{test} eq "no") and (@ok)) {
@@ -734,7 +734,7 @@ sub up_inst {  # returns scalar references to five arrays
 sub sysup {
   my @targets; my $v_repo;
   foreach my $p (keys %V_INST) {
-    next if grep /$p/, @LOCKED;
+    next if grep /^$p$/, @LOCKED;
     $v_repo = ($V_REPO{$p}) ? $V_REPO{$p} : "MISSING" ;
     push @targets, $p if (($v_repo ne $V_INST{$p}) and ($v_repo ne "MISSING"));
   }