[Apophysis-cvs-commits] 2.10/Source Main.pas,1.76,1.77

[Peter S. <zu...@us...>]

Update of /cvsroot/apophysis/2.10/Source
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv5530

Modified Files:
	Main.pas 
Log Message:


Index: Main.pas
===================================================================
RCS file: /cvsroot/apophysis/2.10/Source/Main.pas,v
retrieving revision 1.76
retrieving revision 1.77
diff -C2 -d -r1.76 -r1.77
*** Main.pas	7 Oct 2008 05:25:29 -0000	1.76
--- Main.pas	8 Oct 2008 02:15:19 -0000	1.77
***************
*** 2948,2954 ****
    Palette: TcolorMap;
  begin
!   if (Change = ctState) and (Item.Selected = true) and (Item.Index <> mainCPindex) then
!     //(ListView.SelCount <> 0) and
!     //(Trim(ListView.Selected.Caption) <> Trim(maincp.name)) then
    begin
      assert(ListView.Selected = Item);
--- 2948,2953 ----
    Palette: TcolorMap;
  begin
!   if ((ListView.SelCount <> 0) and (Trim(ListView.Selected.Caption) <> Trim(mainCP.name))) or
!     ((Change = ctState) and (Item.Selected = true) and (Item.Index <> mainCPindex)) then
    begin
      assert(ListView.Selected = Item);