[PD-cvs] pd/src desire.tk,1.1.2.600.2.272,1.1.2.600.2.273

Mathieu Bouchard matju at users.sourceforge.net
Fri Aug 3 18:03:22 CEST 2007


Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19463

Modified Files:
      Tag: desiredata
	desire.tk 
Log Message:
fix index stuff; add dansk in language selector


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.272
retrieving revision 1.1.2.600.2.273
diff -C2 -d -r1.1.2.600.2.272 -r1.1.2.600.2.273
*** desire.tk	3 Aug 2007 15:49:02 -0000	1.1.2.600.2.272
--- desire.tk	3 Aug 2007 16:03:18 -0000	1.1.2.600.2.273
***************
*** 659,663 ****
  #set cmdline(server) \"$cmdline(server)\"
  set encoding ""
! set langoptions {english francais deutsch catala espanol portugues italiano bokmal euskara polski}
  #lappend langoptions {chinese}
  #lappend langoptions {esperanto}
--- 659,663 ----
  #set cmdline(server) \"$cmdline(server)\"
  set encoding ""
! set langoptions {english francais deutsch catala espanol portugues italiano bokmal euskara polski dansk}
  #lappend langoptions {chinese}
  #lappend langoptions {esperanto}
***************
*** 675,678 ****
--- 675,679 ----
    ^(eo|esperanto)$    {set encoding utf-8; list esperanto}
    ^(pl|polski)$       {set encoding utf-8; list polski}
+   ^(dk|dansk)$        {list dansk}
    default {error "huh??? unknown language (locale)"}
  }].tcl
***************
*** 5172,5177 ****
  #A 0 0;
  
! def Canvas index= {i} {set @index $i}
! def Canvas index {} {return $@index}
  
  proc change {self canvas index e {ninlets 0} {noutlets 0} {valid 1}} {
--- 5173,5178 ----
  #A 0 0;
  
! def View index= {i} {set @index $i}
! def View index {} {return $@index}
  
  proc change {self canvas index e {ninlets 0} {noutlets 0} {valid 1}} {





More information about the Pd-cvs mailing list