From b7f983518a58aceb15ed9c368031b2479948f886 Mon Sep 17 00:00:00 2001 From: cjwatson <> Date: Mon, 1 Sep 2003 00:19:24 -0800 Subject: [PATCH] [project @ 2003-09-01 01:19:24 by cjwatson] Require whitespace after 'package' command (#207988). --- scripts/service.in | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scripts/service.in b/scripts/service.in index a4cbc931..c92124db 100755 --- a/scripts/service.in +++ b/scripts/service.in @@ -1,5 +1,5 @@ #!/usr/bin/perl -# $Id: service.in,v 1.91 2003/08/31 14:21:02 cjwatson Exp $ +# $Id: service.in,v 1.92 2003/09/01 01:19:24 cjwatson Exp $ # # Usage: service .nn # Temps: incoming/P.nn @@ -615,7 +615,7 @@ END } } } - } elsif (m/^package\s*(\S.*\S)?\s*$/i) { + } elsif (m/^package\s+(\S.*\S)?\s*$/i) { $ok++; my @pkgs = split /\s+/, $1; if (scalar(@pkgs) > 0) { -- 2.39.5