@@ -2,6 +2,7 @@

+  * sync-accounts comments may be indented.

diff --git a/debian/changelog b/debian/changelog
index 5b424f6d2f9b5169438dd4276f308079b66488ad..8466b92c9b87d598bb298dc8543ef7de2223e23b 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -2,6 +2,7 @@ chiark-utils (3.0.0) unstable; urgency=low
 
   * Added sync-accounts.
   * Manpage sync-accounts(8).
+  * sync-accounts comments may be indented.
 
  --
 

diff --git a/sync-accounts/sync-accounts b/sync-accounts/sync-accounts
index 40d6a6b19fe7363513ab266a0f96c7e8150c77b1..fe5b666d10b0ae25960c90437a2a547305817e33 100755 (executable)
--- a/sync-accounts/sync-accounts
+++ b/sync-accounts/sync-accounts
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: sync-accounts,v 1.18 2002-07-14 17:04:59 ianmdlvl Exp $
+# $Id: sync-accounts,v 1.19 2002-07-14 17:07:44 ianmdlvl Exp $
 #
 # Copyright (C)1999-2000 Ian Jackson <ian@davenant.greenend.org.uk>
 # Copyright (C)2000-2001 nCipher Corporation Ltd
@@ -752,8 +752,8 @@ sub finish () {
 
 while (<CF>) {
     chomp;
-    next if m/^\#/ || !m/\S/;
     s/^\s*//; s/\s*$//;
+    next if m/^\#/ || !m/\S/;
     finish() if m/^end$/;
     if (m/^host\s+(\S+)$/) {
        $ch_name= $1;