--- Urlader/Urlader.pm 2012/01/02 09:23:03 1.1 +++ Urlader/Urlader.pm 2012/01/03 10:37:45 1.2 @@ -30,18 +30,17 @@ our $EXECDIR; # %AppData%/urlader/EXE_ID/i-EXE_VER sub _get_env { + $DATADIR = getenv "URLADER_DATADIR"; $EXE_ID = getenv "URLADER_EXE_ID"; $EXE_VER = getenv "URLADER_EXE_VER"; $EXE_DIR = getenv "URLADER_EXE_DIR"; # %AppData%/urlader/EXE_ID $EXECDIR = getenv "URLADER_EXECDIR"; # %AppData%/urlader/EXE_ID/i-EXE_VER } -_set_datadir unless defined getenv "URLADER_DATADIR"; -$DATADIR = getenv "URLADER_DATADIR"; - _get_env; sub set_exe_info($$) { + _set_datadir unless defined getenv "URLADER_DATADIR"; &_set_exe_info; _get_env; }