[LON-CAPA-cvs] cvs: loncom /homework functionplotresponse.pm

[www]

www		Thu Nov 24 13:43:21 2011 EDT

  Modified files:              
    /loncom/homework	functionplotresponse.pm 
  Log:
  Better output of vector coordinates in Rules Log
  
  
Index: loncom/homework/functionplotresponse.pm
diff -u loncom/homework/functionplotresponse.pm:1.85 loncom/homework/functionplotresponse.pm:1.86
--- loncom/homework/functionplotresponse.pm:1.85	Tue Nov 22 02:13:37 2011
+++ loncom/homework/functionplotresponse.pm	Thu Nov 24 13:43:21 2011
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # Functionplot responses
 #
-# $Id: functionplotresponse.pm,v 1.85 2011/11/22 02:13:37 www Exp $
+# $Id: functionplotresponse.pm,v 1.86 2011/11/24 13:43:21 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1477,7 +1477,7 @@
    my $toly=($ymax-$ymin)/100.;
    my $tail=0;
    my $tip=0;
-   &addlog("Proximity $vector ($xs,$xe,$ys,$ye) to $object ($xo,$yo)");
+   &addlog("Proximity $vector ($xs,$ys)-($xe,$ye) to $object ($xo,$yo)");
    if ((abs($xs-$xo)<$tolx) && (abs($ys-$yo)<$toly)) { $tail=1; }
    if ((abs($xe-$xo)<$tolx) && (abs($ye-$yo)<$toly)) { $tip=1; }
    &addlog("Result tail:$tail tip:$tip");