[Yaacs-svn] SF.net SVN: yaacs: [666] trunk

[<si...@us...>]

Revision: 666
Author:   sickpig
Date:     2006-04-11 07:39:24 -0700 (Tue, 11 Apr 2006)
ViewCVS:  http://svn.sourceforge.net/yaacs/?rev=666&view=rev

Log Message:
-----------
 * op.tcl: fix a typo
 * yadmin: fix a tk bugs 
 * yacco: modify validateCommand to accept 
   only [0-9] as input for phone number (cause
   we will soon use yacati for op recruitment)

Modified Paths:
--------------
    trunk/yaacs/op.tcl
    trunk/yacco.tcl
    trunk/yadmin.tcl
Modified: trunk/yaacs/op.tcl
===================================================================
--- trunk/yaacs/op.tcl	2006-04-11 14:01:43 UTC (rev 665)
+++ trunk/yaacs/op.tcl	2006-04-11 14:39:24 UTC (rev 666)
@@ -302,7 +302,7 @@
 			return -1
 		}
 
-		::yalog::debug "recruitment for project $proj recorder on interviewers.recruitments"
+		::yalog::debug "recruitment for project $projName recorder on interviewers.recruitments"
 
 		# create table for this recruitment
 

Modified: trunk/yacco.tcl
===================================================================
--- trunk/yacco.tcl	2006-04-11 14:01:43 UTC (rev 665)
+++ trunk/yacco.tcl	2006-04-11 14:39:24 UTC (rev 666)
@@ -1329,7 +1329,7 @@
 # @param txt the current str
 # @return 1 if txt is correct, 0 otherwise
 proc ::yacco::onValidatePhone {txt} {
-	if { $txt=="" || [regexp {^[0-9]+$} $txt]!=0 || [regexp {^[0-9]+/[0-9]+$} $txt]!=0  } {
+	if { $txt=="" || [regexp {^[0-9]+$} $txt]!=0} {
 		return 1
 	}
 	return 0

Modified: trunk/yadmin.tcl
===================================================================
--- trunk/yadmin.tcl	2006-04-11 14:01:43 UTC (rev 665)
+++ trunk/yadmin.tcl	2006-04-11 14:39:24 UTC (rev 666)
@@ -1101,7 +1101,7 @@
 	grid .pj.recr.bts - -padx 5 -pady 5 -sticky se
 
 	if {$::yadmin::action == "create"} {
-		.pj.recr.update configure -state disabled
+		$bts.update configure -state disabled
 	} else {
 		array set recr [::op::getRecruitment $::yadmin::passedDb $::yadmin::passedId]
 		if {[array size recr] != 0} {


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