update-alternatives: avoid logging useless status change

ChangeLog

@@ -1,3 +1,8 @@
+2009-02-27  Raphael Hertzog  <hertzog@debian.org>
+
+	* scripts/update-alternatives.pl: Avoid logging too many
+	useless messages about status change.
+
 2009-02-27  Raphael Hertzog  <hertzog@debian.org>
 
 	* scripts/Dpkg/Shlibs/SymbolFile.pm (save, dump): Add new

scripts/update-alternatives.pl

@@ -693,7 +693,8 @@ sub set_status {
     if (!defined($self->status()) or $status ne $self->status()) {
         $self->{modified} = 1;
     }
-    main::log_msg("status of link group " . $self->name() . " set to $status");
+    main::log_msg("status of link group " . $self->name() . " set to $status")
+        if defined($self->status()) and $status ne $self->status();
     $self->{status} = $status;
 }
 sub set_link {