[Bio] / FigKernelPackages / SeedUtils.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/SeedUtils.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.48, Mon Aug 23 23:17:17 2010 UTC revision 1.49, Fri Aug 27 19:24:25 2010 UTC
# Line 1930  Line 1930 
1930          return($func);          return($func);
1931  }  }
1932    
1933    sub strip_func_comment {
1934            my($func) = @_;
1935    
1936            $func =~ s/\s*\#.*$//;
1937            return($func);
1938    }
1939    
1940  sub verify_db {  sub verify_db {
1941      my($db,$type) = @_;      my($db,$type) = @_;
1942    

Legend:
Removed from v.1.48  
changed lines
  Added in v.1.49

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3