Add VENDOR line, too
authorAlan T. DeKok <aland@freeradius.org>
Wed, 20 Aug 2008 15:12:34 +0000 (17:12 +0200)
committerAlan T. DeKok <aland@freeradius.org>
Wed, 20 Aug 2008 15:12:34 +0000 (17:12 +0200)
share/dct2fr

index 3a83c85..e61fb83 100755 (executable)
@@ -17,7 +17,8 @@ while (<>) {
        $name = $1;
        $vendor = $2;
 
-       print "BEGIN-VENDOR foo $2\n";
+       print "VENDOR foo $2\n";
+       print "BEGIN-VENDOR foo\n";
     }
 
 #    if (/^ATTRIBUTE\s+([^ \t]+)\s+$name\s*\((\d+),s+(\w+)\)/i) {