From 381304485e6f0522cba1c87e7327cffac78fb29b Mon Sep 17 00:00:00 2001
From: Jon Griffiths <jon_p_griffiths@yahoo.com>
Date: Fri, 23 Apr 2004 21:28:19 +0000
Subject: [PATCH] Accept exports with '@' in their name. Link to winehq source
 for implemented functions.

---
 tools/c2man.pl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/tools/c2man.pl b/tools/c2man.pl
index 8547d42ea7..836c82f3ea 100755
--- a/tools/c2man.pl
+++ b/tools/c2man.pl
@@ -470,7 +470,7 @@ sub process_source_file
     elsif ($parse_state == 3) # Reading in the first line of a comment
     {
       s/^ *\** *//;
-      if ( /^(@|[A-Za-z0-9_]+) +(\(|\[)([A-Za-z0-9_]+)\.(([0-9]+)|@)(\)|\])$/ )
+      if ( /^([\@A-Za-z0-9_]+) +(\(|\[)([A-Za-z0-9_]+)\.(([0-9]+)|@)(\)|\])$/ )
       {
         # Found a correctly formed "ApiName (DLLNAME.Ordinal)" line.
         $comment->{COMMENT_NAME} = $1;
@@ -1641,6 +1641,11 @@ sub output_api_comment
     }
     else
     {
+      if ($opt_output_format eq "h")
+      {
+        # Link to the file in WineHQ cvs
+        s/^(Implemented in \")(.+?)(\"\.)/$1$2$3 http:\/\/source.winehq.org\/source\/$2/g;
+      }
       # Highlight strings
       s/(\".+?\")/$fmt[2]$1$fmt[3]/g;
       # Highlight literal chars