[PD-cvs] pd/src desire.tk,1.1.2.595,1.1.2.596
Mathieu Bouchard
matju at users.sourceforge.net
Mon Nov 27 22:17:31 CET 2006
Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1782
Modified Files:
Tag: devel_0_39
desire.tk
Log Message:
tclsh mode with our own repl
Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.595
retrieving revision 1.1.2.596
diff -C2 -d -r1.1.2.595 -r1.1.2.596
*** desire.tk 27 Nov 2006 20:46:47 -0000 1.1.2.595
--- desire.tk 27 Nov 2006 21:17:27 -0000 1.1.2.596
***************
*** 7424,7427 ****
set cmdline(console) 0
package require tclreadline
! ::tclreadline::Loop
}
--- 7424,7434 ----
set cmdline(console) 0
package require tclreadline
! #::tclreadline::Loop
! proc ::tclreadline::prompt1 {} {return "desire> "}
! while {1} {
! puts "What?"
! if {[catch {puts [::tclreadline::readline read]}]} {
! puts $::errorInfo
! }
! }
}
More information about the Pd-cvs
mailing list