[Pgp-tools-commit] r882 - trunk/gpg-key2ps

[Guilhem Moulin]

Author: guilhem-guest
Date: 2016-10-06 13:04:49 +0000 (Thu, 06 Oct 2016)
New Revision: 882

Modified:
   trunk/gpg-key2ps/gpg-key2ps
Log:
gpg-key2ps: fix tab damage.

Modified: trunk/gpg-key2ps/gpg-key2ps
===================================================================
--- trunk/gpg-key2ps/gpg-key2ps	2016-09-30 11:12:12 UTC (rev 881)
+++ trunk/gpg-key2ps/gpg-key2ps	2016-10-06 13:04:49 UTC (rev 882)
@@ -224,11 +224,11 @@
 	print <<EOF;
 /revuid {
 	uid
-    45 y 12 add moveto h 2 div 45 sub y 12 add lineto stroke
+	45 y 12 add moveto h 2 div 45 sub y 12 add lineto stroke
 } def
 /revsbk {
 	sbk
-    45 y 12 add moveto h 2 div 45 sub y 12 add lineto stroke
+	45 y 12 add moveto h 2 div 45 sub y 12 add lineto stroke
 } def
 EOF
 }
@@ -252,14 +252,14 @@
 	if ( /^pub:/ ) {
 		start_postscript() unless $started;
 		$started = 1;
-        $subkey = 0;
+		$subkey = 0;
 		$numlines++;
 	}
 	# primary uid
 	s/^pub:[^:]*:([^:]*):([0-9]*):.{8,8}(.{8,8}):([^:]*):[^:]*:[^:]*:[^:]*:([^:]*):[^:]*:[^:]*:.*/	($5) ($4) ($3) $2 ($1) pub/;
 	# fingerprint, format it nicely with spaces
 	if ( /^fpr:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:([^:]*):.*/ ) {
-        next if $subkey;
+		next if $subkey;
 		my $fpr = $1;
 		# v4 key
 		$fpr =~ s/(\w{4})(\w{4})(\w{4})(\w{4})(\w{4})(\w{4})(\w{4})(\w{4})(\w{4})(\w{4})/$1 $2 $3 $4 $5  $6 $7 $8 $9 $10/;
@@ -276,7 +276,7 @@
 		next if $revokestyle eq "hide";
 	}
 	# subkey
-    $subkey = 1 if /^sub:/;
+	$subkey = 1 if /^sub:/;
 	if (s/^sub:[^r:]*:([^:]*):([0-9]*):.{8,8}(.{8,8}):([^:]*):[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:[^:]*:.*/	($4) ($3) $2 ($1) sbk/) {
 		next if ! $showsubkeys;
 	}