chiark
/
gitweb
/
~ian
/
chiark-utils.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
@@ -2,6 +2,7 @@
[chiark-utils.git]
/
sync-accounts
/
sync-accounts
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
#!/usr/bin/perl
-# $Id: sync-accounts,v 1.1
8 2002-07-14 17:04:59
ianmdlvl Exp $
+# $Id: sync-accounts,v 1.1
9 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
#
# 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;
while (<CF>) {
chomp;
- next if m/^\#/ || !m/\S/;
s/^\s*//; s/\s*$//;
s/^\s*//; s/\s*$//;
+ next if m/^\#/ || !m/\S/;
finish() if m/^end$/;
if (m/^host\s+(\S+)$/) {
$ch_name= $1;
finish() if m/^end$/;
if (m/^host\s+(\S+)$/) {
$ch_name= $1;