--- branches/zimbardo/lib/Frey/SVK.pm	2009/07/05 21:40:16	1172
+++ branches/zimbardo/lib/Frey/SVK.pm	2009/07/07 22:07:51	1181
@@ -120,7 +120,7 @@
 		my ( $path, $action ) = @_;
 		qq|<form class="inline" method="post"><input type="hidden" name="path" value="$path"><input type="submit" name="action" value="$action"></form>|;
 	};
-	$diff =~ s{^(===\s+)(\S+)$}{$1 . form($2,'revert') . qq| <a name="$2" target="editor" href="/editor+$2+1">$2</a> | . form($2,'postpone') }gem;
+	$diff =~ s{(^|<pre>)(===\s+)(\S+)$}{$1 . $2 . form($3,'revert') . qq| <a name="$3" target="editor" href="/editor+$3+1">$3</a> | . form($3,'postpone') }gem;
 
 	warn "diff_as_markup ",length($diff)," bytes";
 	return $diff;