home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / lang / tcl / 1823 < prev    next >
Encoding:
Text File  |  1992-11-13  |  1.5 KB  |  41 lines
  1. Path: sparky!uunet!know!cass.ma02.bull.com!mips2!news.bbn.com!usc!sdd.hp.com!hpscit.sc.hp.com!scd.hp.com!hpscdm!hplextra!hpcc05!okamoto
  2. From: okamoto@hpcc05.corp.hp.com (Jeff Okamoto)
  3. Newsgroups: comp.lang.tcl
  4. Subject: selecting text then moving scrollbar bombs (tk2.3/tcl6.4)
  5. Message-ID: <47950001@hpcc05.corp.hp.com>
  6. Date: 13 Nov 92 02:01:09 GMT
  7. Organization: HP Corporate Computing & Services
  8. Lines: 31
  9.  
  10. Got a strange problem with Tk 2.3 and Tcl 6.4 on an HP 9000/852 running
  11. HP-UX A.08.00 displaying to a 9000/710 running A.08.07 under VUE 2.01.
  12.  
  13. Here's my script:
  14.  
  15.     scrollbar .scroll -command ".text yview" -relief raised
  16.     text .text -yscroll ".scroll set" -width 80 -height 24 -relief sunken
  17.  
  18.     pack append . .scroll {right filly} .text {left expand fill}
  19.  
  20.     if $argc>0 {set file [lindex $argv 0]} else {set file "file-name"}
  21.  
  22.     .text insert end [exec cat $file]
  23.  
  24. The window pops up fine but if I do "certain things", my server will freeze
  25. up, then drop me back to the Vue login screen.
  26.  
  27. After some experimentation, it *looks* like these "certain things" may be
  28. related to selecting a portion of text, then moving the scrollbar *before
  29. the selection is completely highlited*.  Interestingly enough, with -sync
  30. turned on, this doesn't seem to bomb out from VUE/X.
  31.  
  32. Does anyone have any suggestions on what to do to better nail down what's
  33. happening?
  34. -- 
  35.  \      oo    The New Number Who,
  36.   \____|\mm    Jeff Okamoto
  37.   //_//\ \_\    HP Corporate Computing & Services
  38.  /K-9/  \/_/    okamoto@ranma.corp.hp.com
  39. /___/_____\    
  40. -----------    (415) 857-6236
  41.