End warns with newlines
[pgp-tools.git] / gpg-key2ps / gpg-key2ps
index c4efc6358a92d215ac67b740a830ef904a3af052..fab1936a59837a806192a845baea8ddb919193c4 100755 (executable)
@@ -1,8 +1,12 @@
 #! /bin/sh
+#
+# gpg-key2ps: convert a PGP/GnuPG key into paper slips.
+#
+# $Id$
 
 set -e
 
-VERSION="0.3.1"
+VERSION="0.4.0"
 USAGE="Usage: $0 [-p papersize] [-r revoked-style] keyid-or-name"
 
 
@@ -189,7 +193,7 @@ sed -e '/^tru:/d' \
     -e 's/@split@\(.\{4,4\}\)\(.\{4,4\}\)\(.\{4,4\}\)\(.\{4,4\}\)\(.\{4,4\}\)@/\1 \2 \3 \4 \5/g' \
     -e 's/^uid:[^:r]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:\([^:]*\):.*/  (\1) uid/' \
     -e 's/^uid:r[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:\([^:]*\):.*/  (\1) revuid/' \
-    -e 's/^sub:[^:]*:\([^:]*\):[^:]*:.\{8,8\}\(.\{8,8\}\):\([^:]*\):[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:.*/    (\3) (\2) (g) (\1) sbk/' \
+    -e 's/^sub:[^:]*:\([^:]*\):16:.\{8,8\}\(.\{8,8\}\):\([^:]*\):[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:.*/       (\3) (\2) (g) (\1) sbk/' \
     <$TMPFILE
 cat <<EOF
 } def