Change 34350 by [EMAIL PROTECTED] on 2008/09/11 21:27:07

        Use 1 line of code in place of 6 in Perl_sv_derived_from().

Affected files ...

... //depot/perl/universal.c#196 edit

Differences ...

==== //depot/perl/universal.c#196 (text) ====
Index: perl/universal.c
--- perl/universal.c#195~34349~ 2008-09-11 14:12:51.000000000 -0700
+++ perl/universal.c    2008-09-11 14:27:07.000000000 -0700
@@ -116,12 +116,7 @@
         stash = gv_stashsv(sv, 0);
     }
 
-    if (stash) {
-       return isa_lookup(stash, name);
-    }
-    else
-       return FALSE;
-
+    return stash ? isa_lookup(stash, name) : FALSE;
 }
 
 /*
End of Patch.

Reply via email to