Changeset 81 for trunk/Common
- Timestamp:
- Jun 21, 2012, 12:21:50 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Common/UUtils.pas
r80 r81 21 21 22 22 uses 23 U MainModule;23 UCore; 24 24 25 25 function HtmlLink(Text, Target: string): string; … … 97 97 begin 98 98 if (Length(URL) > 0) and (URL[1] = '/') then 99 Result := MainModule.BaseURL + URL99 Result := Core.BaseURL + URL 100 100 else Result := URL; 101 101 end;
Note:
See TracChangeset
for help on using the changeset viewer.