package c; # $Id$ use vars qw($AUTOLOAD); use c::stuff; use MDK::Common; sub AUTOLOAD() { $AUTOLOAD =~ /::(.*)/ or return; my @l = eval { &{$c::stuff::{$1}} }; if (my $err = $@) { $err =~ /Undefined subroutine &main::/ ? die("can't find function $AUTOLOAD\n" . backtrace()) : die($err); } wantarray() ? @l : $l[0]; } 1; k rel='vcs-git' href='ssh://git@git.mageia.org/software/drakx' title='drakx Git repository'/>
summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2005-04-21 12:41:00 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2005-04-21 12:41:00 +0000
commitcf506a30fbf0f8558cc0e3f28ef82e6ab74b5a98 (patch)
tree0d8adcac404f4c14912a98a30c86305da2cbcb47
parent01cf0fa40f2106e5146f67911dd60dc5b69d966a (diff)
downloaddrakx-cf506a30fbf0f8558cc0e3f28ef82e6ab74b5a98.tar
drakx-cf506a30fbf0f8558cc0e3f28ef82e6ab74b5a98.tar.gz
drakx-cf506a30fbf0f8558cc0e3f28ef82e6ab74b5a98.tar.bz2
drakx-cf506a30fbf0f8558cc0e3f28ef82e6ab74b5a98.tar.xz
drakx-cf506a30fbf0f8558cc0e3f28ef82e6ab74b5a98.zip
update