From 309e885a592a8d2d21b2b7ae5c1a28c5c89ce1fc Mon Sep 17 00:00:00 2001
From: Holger Weiss <holger@zedat.fu-berlin.de>
Date: Tue, 18 Feb 2014 23:04:28 +0100
Subject: filter-github-emails: Rewrap blockquotes properly

When wrapping a line that begins with a ">", let all resulting lines
begin with a ">".  (Properly handle nested blockquotes, too.)

diff --git a/libexec/filter-github-emails b/libexec/filter-github-emails
index 6f1f3a6..326495d 100755
--- a/libexec/filter-github-emails
+++ b/libexec/filter-github-emails
@@ -119,7 +119,19 @@ sub bye {
 #
 
 sub rewrap {
-	my $wrap = sub { /^(?: {4}|\t)/ ? $_ : wrap('', '', $_) };
+	my $wrap = sub {
+		my $line = shift;
+		my $indent;
+
+		if ($line =~ /^(?: {4}|\t)/) {
+			return $line;
+		} elsif (/^([> ]+)/) {
+			$indent = $1;
+		} else {
+			$indent = '';
+		}
+		return wrap('', $indent, $line);
+	};
 	my @lines = split(/\n/, shift);
 	my @wrapped = map { $wrap->($_) } @lines;
 
-- 
cgit v0.10-9-g596f