added disable internal link ! to Gwiki

git-svn-id: http://biopieces.googlecode.com/svn/trunk@121 74ccb610-7750-0410-82ae-013aeee3265d

diff --git a/code_perl/Maasha/Gwiki.pm b/code_perl/Maasha/Gwiki.pm
index 452fc386e1425b97ed976be1d48198b08a7acd91..042eed679e6e6ca93d1b4e2cfd2ba7ca1bd7d5fe 100644 (file)
--- a/code_perl/Maasha/Gwiki.pm
+++ b/code_perl/Maasha/Gwiki.pm
@@ -89,6 +89,7 @@ sub gwiki2ascii
             {
                 $line = $triple->{ 'TEXT' };
 
+                $line =~ s/!(\w)/$1/g;
                 $line =~ s/^\s*//;
                 $line =~ s/\s*$//;
                 $line =~ s/\s+/ /g;