From: mquinson <mquinson@48e7efb5-ca39-0410-a469-dd3cf9ba447f>
Date: Fri, 31 Dec 2004 20:43:55 +0000 (+0000)
Subject: Fix perl syntax
X-Git-Tag: v3.3~4622
X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/343240db9464312aa8348d552be7f2db98614e80

Fix perl syntax


git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/simgrid/simgrid/trunk@728 48e7efb5-ca39-0410-a469-dd3cf9ba447f
---

diff --git a/examples/gras_stub_generator b/examples/gras_stub_generator
index e784543dfc..2791ff51ed 100755
--- a/examples/gras_stub_generator
+++ b/examples/gras_stub_generator
@@ -15,7 +15,7 @@ eval qq{
 
 sub usage {
     my ($msg)=@_;
-    fail ($msg? "gras_stub_generator: $msg\n":"").
+    die ($msg? "gras_stub_generator: $msg\n":"").
 	 "gras_stub_generator: USAGE\n".
 	 "  gras_stub_generator project_name deployment_file\n"
 }