Bug in LMDFileCreate (LMDFiles.pas) when getting SVN-Version
  • Vote Up0Vote Down BernhardGeyer
    Posts: 27
    Following lines must be delete:

    <<<<<<< .mine
    {$IFDEF D+}
    {$R+}
    {$ENDIF D+}
      0, nil, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0));
    =======
    >>>>>>> .r8939

  • 2 Comments sorted by
  • Vote Up0Vote Down Alexander Hramov (LMD)
    Posts: 34
    We haven't such lines in LMDFiles.pas from svn.

    function LMDFileCreate(const FileName: TLMDString): THandle;
    begin
      {$IFDEF LMD_UNICODE}
      Result := Integer(CreateFileW(PWideChar(FileName), GENERIC_READ or GENERIC_WRITE, 0,
        nil, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0));
      {$ELSE}
      Result := Integer(Windows.CreateFile(PChar(FileName), GENERIC_READ or GENERIC_WRITE, 0,
        nil, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0));
      {$ENDIF}
    end;
  • Vote Up0Vote Down BernhardGeyer
    Posts: 27
    Ok. So it seem that there was done a merge on my checkout-directory.
Add a Comment

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Sign In with Google Sign In with OpenID Sign In with Twitter
Sign In Apply for Membership

Categories

In this Discussion