From 3b62f14460f3f02e748f92d221ef6ead5ef77073 Mon Sep 17 00:00:00 2001
From: Angel Ortega <angel@triptico.com>
Date: Fri, 28 Nov 2008 11:11:53 +0100
Subject: [PATCH] Fixed ugly leading spaces and marks in function syntax.

---
 mp_doccer | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/mp_doccer b/mp_doccer
index ab87fef..5aad0e3 100755
--- a/mp_doccer
+++ b/mp_doccer
@@ -893,9 +893,12 @@ sub format_grutatxt
 
 		print F _grutatxt_header('Synopsis', '~');
 
-		my $syn = defined($f->{'altsyn'}) ? $f->{'altsyn'} : $f->{'syn'};
+		my $syn = $f->{'altsyn'} || (' ' . $f->{'syn'});
 
-		print F ' ' . $syn . "\n\n";
+		# strip arg and return value marks
+		$syn =~ s/[@%]([\w]+)/$1/g;
+
+		print F $syn . "\n\n";
 
 		if ($f->{'arg'}) {
 			my @a = @{$f->{'arg'}};
-- 
2.11.4.GIT