From 397f769013a7c356d4f0dcc96acd4c0370b9c338 Mon Sep 17 00:00:00 2001
From: doogie <>
Date: Sat, 3 May 2003 20:10:40 -0800
Subject: [PATCH] [project @ 2003-05-03 21:10:40 by doogie] Warn when
 reassigning to an unknown package.

---
 debian/changelog   | 1 +
 scripts/service.in | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/debian/changelog b/debian/changelog
index 4ce9ef96..f1281a69 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -17,6 +17,7 @@ debbugs (2.4.1) UNRELEASED; urgency=low
     - Convert all code to use global read/write functions, instead of having
       it duplicated everwhere.
     - Trim trailing whitespace from pseudoheader values.  Closes: #153590.
+    - Warn when reassigning to an unknown package.  Closes: #60595.
 
  -- Colin Watson <cjwatson@debian.org>  Mon, 25 Nov 2002 03:50:20 +0000
 
diff --git a/scripts/service.in b/scripts/service.in
index 3ac382c5..7813c3c4 100755
--- a/scripts/service.in
+++ b/scripts/service.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: service.in,v 1.73 2003/05/03 20:01:20 doogie Exp $
+# $Id: service.in,v 1.74 2003/05/03 21:10:40 doogie Exp $
 # ^ more or less ^
 #
 # Usage: service <code>.nn
@@ -1008,6 +1008,7 @@ sub addmaintainers {
 	    print "maintainer add >$p|$addmaint<\n" if $debug;
         } else { 
 	    print "maintainer none >$p<\n" if $debug; 
+	    &transcript("Warning: Unknown package '$p'\n");
 	    &transcript("MR|unknown-package|$p|$ref|\n") if $dl>2;
             $maintccreasons{$gUnknownMaintainerEmail}{$p}{$ref}= 1;
 	}
-- 
2.39.5