remove non sense assignment

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2593 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2012-11-06 03:41:59 +00:00
parent 19067c2529
commit 106fd8d85b
1 changed files with 0 additions and 1 deletions
--- a/components/virtualtreeview-new/branches/4.8/VirtualTrees.pas
+++ b/components/virtualtreeview-new/branches/4.8/VirtualTrees.pas
@ -11647,7 +11647,6 @@ begin
      ctRadioButton:
        if Value = csCheckedNormal then
        begin
-          Value := csCheckedNormal;
          // Make sure only this node is checked.
          Run := Parent.FirstChild;
          while Assigned(Run) do