From b3f1019ad238b0546e55f1c1d59522d907b2d99a Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 17 Jun 2013 19:34:39 +0000
Subject: [PATCH] cody: unit deps: all units: open package editor

git-svn-id: trunk@41755 -
---
 components/codetools/ide/codyunitdepwnd.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/components/codetools/ide/codyunitdepwnd.pas b/components/codetools/ide/codyunitdepwnd.pas
index 7bf131b4c8..8a1669998e 100644
--- a/components/codetools/ide/codyunitdepwnd.pas
+++ b/components/codetools/ide/codyunitdepwnd.pas
@@ -407,6 +407,7 @@ var
   TVNode: TTreeNode;
   UDNode: TUDNode;
   UGGroup: TUGGroup;
+  Pkg: TIDEPackage;
 begin
   TVNode:=AllUnitsTreeView.GetNodeAt(X,Y);
   if TVNode=nil then exit;
@@ -415,6 +416,7 @@ begin
     UDNode:=TUDNode(TVNode.Data);
   if (Button=mbLeft) and (ssDouble in Shift) and (UDNode<>nil) then begin
     if UDNode.Typ=udnUnit then
+      // open unit in source editor
       LazarusIDE.DoOpenEditorFile(UDNode.Identifier,-1,-1,[ofAddToRecent])
     else if UDNode.Typ=udnGroup then begin
       UGGroup:=FGroups.GetGroup(UDNode.Group,false);
@@ -423,7 +425,8 @@ begin
         // open project inspector
         ExecuteIDECommand(Self,ecProjectInspector);
       end else begin
-
+        // open package editor
+        PackageEditingInterface.DoOpenPackageWithName(UGGroup.Name,[pofAddToRecent],false);
       end;
     end;
   end;