… | |
… | |
21 | |
21 | |
22 | use XSLoader; |
22 | use XSLoader; |
23 | XSLoader::load __PACKAGE__, $VERSION; |
23 | XSLoader::load __PACKAGE__, $VERSION; |
24 | } |
24 | } |
25 | |
25 | |
|
|
26 | our $URLADER_VERSION; # only ste when running under urlader |
26 | our $DATADIR; |
27 | our $DATADIR; |
27 | our $EXE_ID; |
28 | our $EXE_ID; |
28 | our $EXE_VER; |
29 | our $EXE_VER; |
29 | our $EXE_DIR; # %AppData%/urlader/EXE_ID |
30 | our $EXE_DIR; # %AppData%/urlader/EXE_ID |
30 | our $EXECDIR; # %AppData%/urlader/EXE_ID/i-EXE_VER |
31 | our $EXECDIR; # %AppData%/urlader/EXE_ID/i-EXE_VER |
31 | |
32 | |
32 | sub _get_env { |
33 | sub _get_env { |
|
|
34 | $URLADER_VERSION = getenv "URLADER_VERSION"; |
33 | $DATADIR = getenv "URLADER_DATADIR"; |
35 | $DATADIR = getenv "URLADER_DATADIR"; |
34 | $EXE_ID = getenv "URLADER_EXE_ID"; |
36 | $EXE_ID = getenv "URLADER_EXE_ID"; |
35 | $EXE_VER = getenv "URLADER_EXE_VER"; |
37 | $EXE_VER = getenv "URLADER_EXE_VER"; |
36 | $EXE_DIR = getenv "URLADER_EXE_DIR"; # %AppData%/urlader/EXE_ID |
38 | $EXE_DIR = getenv "URLADER_EXE_DIR"; # %AppData%/urlader/EXE_ID |
37 | $EXECDIR = getenv "URLADER_EXECDIR"; # %AppData%/urlader/EXE_ID/i-EXE_VER |
39 | $EXECDIR = getenv "URLADER_EXECDIR"; # %AppData%/urlader/EXE_ID/i-EXE_VER |
38 | } |
40 | } |
39 | |
41 | |
40 | _get_env; |
42 | _get_env; |
41 | |
43 | |
42 | sub set_exe_info($$) { |
44 | sub set_exe_info($$) { |