|
3 | 3 | interface |
4 | 4 | uses |
5 | 5 | msegui{$ifdef linux},baseunix{$endif},mseclasses,mseforms,msestrings,mseconsts,msei18nutils,strutils,math,dateutils,msesys, |
6 | | - sysutils,msefileutils,msereal,msesysintf,msesysenv,msetypes,mseprocutils{,idea},msestream,classes |
| 6 | + sysutils,msefileutils,msereal,msesysintf,msesysenv,msetypes,mseprocutils{,idea},msestream,classes, msemacros |
7 | 7 | {$ifdef mswindows} |
8 | 8 | ,windows,shlobj,activex,comobj |
9 | 9 | {$endif}; |
@@ -151,12 +151,13 @@ procedure getmacros; |
151 | 151 | begin |
152 | 152 | fmacro:= tmacrolist.create([mao_caseinsensitive]); |
153 | 153 | {$ifdef linux} |
154 | | - fmacro.add(['HOMEDIR'],[removeendpath(sys_getapphomedir)]); |
| 154 | + fmacro.add(['HOMEDIR'],[removeendpath(sys_getapphomedir)] ,[]); |
| 155 | + |
155 | 156 | str2:= splitstring(getenvironmentvariable('MANPATH'),':'); |
156 | 157 | if str2<>nil then begin |
157 | | - fmacro.add(['MANPATH'],[removeendpath(str2[0])]); |
| 158 | + fmacro.add(['MANPATH'],[removeendpath(str2[0])],[]); |
158 | 159 | end; |
159 | | - fmacro.add(['TMPDIR'],[removeendpath(sys_gettempdir)]); |
| 160 | + fmacro.add(['TMPDIR'],[removeendpath(sys_gettempdir)],[]); |
160 | 161 | {$endif} |
161 | 162 | {$ifdef mswindows} |
162 | 163 | fmacro.add(['PROGRAMFILES'],[removeendpath(sysutils.getenvironmentvariable('ProgramFiles'),'\')]); |
|
0 commit comments