summaryrefslogtreecommitdiff
path: root/UCore.pas
diff options
context:
space:
mode:
Diffstat (limited to 'UCore.pas')
-rw-r--r--UCore.pas2
1 files changed, 2 insertions, 0 deletions
diff --git a/UCore.pas b/UCore.pas
index 416bd45..deccbb1 100644
--- a/UCore.pas
+++ b/UCore.pas
@@ -2192,8 +2192,10 @@ begin
AFSymlink.ToEntry.Text := StrToUTF8(PossibleNewName);
AFSymlink.ToEntry.SetFocus;
AFSymlink.ToEntry.SelectAll;
+ AFSymLink.RelativeCheckButton.Checked := ConfMakeSymlinkRelative;
if AFSymlink.Run = mbOK then Result := HandleCreateSymlink(UTF8ToStr(AFSymlink.FromEntry.Text),
ProcessPattern(Engine, UTF8ToStr(AFSymlink.ToEntry.Text), Engine.Path, '', False));
+ if Result then ConfMakeSymlinkRelative := AFSymLink.RelativeCheckButton.Checked;
finally
AFSymlink.Free;
end;