mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-09 15:28:14 +02:00
clean up
git-svn-id: trunk@16391 -
This commit is contained in:
parent
d32bb80d0a
commit
c6b8b09502
@ -504,8 +504,6 @@ end;
|
||||
|
||||
function CreateSymlinkInteractive(const LinkFilename, TargetFilename: string;
|
||||
ErrorButtons: TMsgDlgButtons): TModalResult;
|
||||
var i: integer;
|
||||
Dir: string;
|
||||
begin
|
||||
{$IFDEF Unix}
|
||||
if FpReadLink(LinkFilename)=TargetFilename then exit(mrOk);
|
||||
|
Loading…
Reference in New Issue
Block a user