Revision: 54475
          http://brlcad.svn.sourceforge.net/brlcad/?rev=54475&view=rev
Author:   bob1961
Date:     2013-02-25 13:53:29 +0000 (Mon, 25 Feb 2013)
Log Message:
-----------
Fixed a redraw issue in Archer::editMotionDeltaCallback.

Modified Paths:
--------------
    brlcad/trunk/src/tclscripts/archer/Archer.tcl

Modified: brlcad/trunk/src/tclscripts/archer/Archer.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/Archer.tcl       2013-02-25 13:15:42 UTC 
(rev 54474)
+++ brlcad/trunk/src/tclscripts/archer/Archer.tcl       2013-02-25 13:53:29 UTC 
(rev 54475)
@@ -4209,6 +4209,8 @@
        set pobj $mSelectedObjPath
     }
 
+    set rflag 1
+
     switch -- [lindex $args 0] {
        "orotate" {
            if {$argslen != 4} {
@@ -4237,6 +4239,7 @@
                }
            } else {
                set cmd "orotate $pobj $rx $ry $rz"
+               set rflag 0
            }
        }
        "otranslate" {
@@ -4261,6 +4264,7 @@
                }
            } else {
                set cmd "otranslate $pobj $dx $dy $dz"
+               set rflag 0
            }
        }
        "oscale" {
@@ -4288,6 +4292,7 @@
                }
            } else {
                set cmd "oscale $pobj $sf"
+               set rflag 0
            }
        }
        default {
@@ -4296,7 +4301,10 @@
     }
 
     eval $cmd
-    redrawObj $pobj 0
+
+    if {$rflag} {
+       redrawObj $mSelectedObjPath 0
+    }
 }
 
 

This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.


------------------------------------------------------------------------------
Everyone hates slow websites. So do we.
Make your web apps faster with AppDynamics
Download AppDynamics Lite for free today:
http://p.sf.net/sfu/appdyn_d2d_feb
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits

Reply via email to