svn commit: r111556 - /perl/modperl/trunk/src/modules/perl/modperl_handler.c

[stas]

Author: stas
Date: Fri Dec 10 16:09:09 2004
New Revision: 111556

URL: http://svn.apache.org/viewcvs?view=rev&rev=111556
Log:
avoid segfaults

Modified:
   perl/modperl/trunk/src/modules/perl/modperl_handler.c

Modified: perl/modperl/trunk/src/modules/perl/modperl_handler.c
Url: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/src/modules/perl/modperl_handler.c?view=diff&rev=111556&p1=perl/modperl/trunk/src/modules/perl/modperl_handler.c&r1=111555&p2=perl/modperl/trunk/src/modules/perl/modperl_handler.c&r2=111556
==============================================================================
--- perl/modperl/trunk/src/modules/perl/modperl_handler.c       (original)
+++ perl/modperl/trunk/src/modules/perl/modperl_handler.c       Fri Dec 10 
16:09:09 2004
@@ -189,7 +189,7 @@
     }
     else {
         /* anon sub stores the internal modperl name in mgv_obj */
-        return handler->mgv_obj->name;
+        return handler->mgv_obj ? handler->mgv_obj->name : "unknown";
     }
 }