mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: File name in new file dialog

Browse source
This commit is contained in:
Alexander Koblov 2009-03-14 19:33:00 +00:00
commit 0540dc29f0
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
uacts.pas
View file

@ -1558,8 +1558,12 @@ var
begin
with frmMain do
begin
sNewFile:=ActiveFrame.ActiveDir + rsEditNewFile;
if ActiveFrame.IsActiveItemValid then
sNewFile:= ActiveFrame.GetActiveItem^.sName
else
sNewFile:= rsEditNewFile;
if not InputQuery(rsEditNewOpen, rsEditNewFileName, sNewFile) then Exit;
sNewFile:= ActiveFrame.ActiveDir + sNewFile;
if not mbFileExists(sNewFile) then
try
hFile:= mbFileCreate(sNewFile);