浏览代码

Removing some nonsense code

Source commit: a13668b033c671b0404d5367615f32a1889f3910
Martin Prikryl 4 年之前
父节点
当前提交
1a9973f569
共有 1 个文件被更改,包括 0 次插入6 次删除
  1. 0 6
      source/packages/filemng/DriveView.pas

+ 0 - 6
source/packages/filemng/DriveView.pas

@@ -804,7 +804,6 @@ end; {CanEdit}
 
 procedure TDriveView.Edit(const Item: TTVItem);
 var
-  NewDirName: string;
   SRec: TSearchRec;
   Node: TTreeNode;
   Info: string;
@@ -819,11 +818,6 @@ begin
       for i := Length(Info) downto 1 do
         System.Insert(Space, Info, i);
 
-      if Assigned(OnEdited) then
-      begin
-        NewDirName := Node.Text;
-        OnEdited(Self, Node, NewDirName);
-      end;
       if Length(Item.pszText) > 0 then
         raise EInvalidDirName.CreateFmt(SErrorInvalidDirName, [Info]);
       Exit;