Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Tracker SCM

SCM Repository

[smlnj] Diff of /sml/trunk/src/eXene/widgets/text/txtwin.sml
ViewVC logotype

Diff of /sml/trunk/src/eXene/widgets/text/txtwin.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1349, Wed Sep 3 22:22:18 2003 UTC revision 1350, Fri Sep 5 21:34:27 2003 UTC
# Line 142  Line 142 
142          end          end
143    
144          fun redraw (p, on_off) = (          fun redraw (p, on_off) = (
145            text (PT{x=0,y=fonta}, CA.extract (buf, 0, NONE));            text (PT{x=0,y=fonta}, CA.vector buf);
146                  if on_off then cursor_on p else ()                  if on_off then cursor_on p else ()
147          )          )
148    

Legend:
Removed from v.1349  
changed lines
  Added in v.1350

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0