Commit f8434aad authored by David Johnson's avatar David Johnson

Fix suddenly-appearing bug in libosload_new dynamic module loading code.

Not sure why this change was needed, but it wasn't working anymore.
Maybe this is a perl 5.10 -> 5.12 thing; how I was doing an eval of a
require to load an libosload_X module was no longer working.  The new
way is better anyway, but even after looking through the perlXdelta
pages, I didn't see a reason for this.

Oh well.
parent 5ca81df7
......@@ -298,7 +298,7 @@ sub NewType($$)
# Not loaded?
if ($@) {
$self->dprint(2,"NewType($type): simple module load failed: " . $@);
eval "require \"libosload_" . $type . "\"";
eval "require libosload_${type}";
$newtype = eval { $packname->New($self); };
if ($@) {
$self->dprint(1,"$self NewType($type): module load failed: " . $@);
......@@ -2,8 +2,7 @@
package libosload_switch;
use strict;
use lib '@prefix@/lib';
use libosload;
use libosload_new;
use base qw(libosload_common);
use vars qw($AUTOLOAD);
Markdown is supported
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment