[Win32forth-cvs] win32forth/src BUTTON.F,1.2,1.3 Menu.f,1.7,1.8

[George H. <geo...@us...>]

Update of /cvsroot/win32forth/win32forth/src
In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv302

Modified Files:
	BUTTON.F Menu.f 
Log Message:
Removed HIDE from menu items and toolbar buttons to work with  fixed :NONAME

Index: BUTTON.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/BUTTON.F,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** BUTTON.F	24 Aug 2005 07:24:10 -0000	1.2
--- BUTTON.F	26 Jun 2010 08:24:15 -0000	1.3
***************
*** 410,414 ****
                  GetBCnt: BuildBar 1+ PutBCnt: BuildBar      \ bump count
                  :noname to bfunc
!                 hide !csp
                  ;
  
--- 410,414 ----
                  GetBCnt: BuildBar 1+ PutBCnt: BuildBar      \ bump count
                  :noname to bfunc
!                 !csp
                  ;
  
***************
*** 481,485 ****
                  GetBCnt: BuildBar 1+ PutBCnt: BuildBar      \ bump count
                  :noname to bfunc
!                 hide !csp
                  ;
  
--- 481,485 ----
                  GetBCnt: BuildBar 1+ PutBCnt: BuildBar      \ bump count
                  :noname to bfunc
!                 !csp
                  ;
  
***************
*** 691,695 ****
                          then
                          GetPrev: hb to hb
!                 repeat  
          then
                  ;M
--- 691,695 ----
                          then
                          GetPrev: hb to hb
!                 repeat
          then
                  ;M
***************
*** 706,710 ****
  :M On_Done:       ( -- )
                  On_Done: super
!                 FALSE to started? 
                  ;M
  
--- 706,710 ----
  :M On_Done:       ( -- )
                  On_Done: super
!                 FALSE to started?
                  ;M
  
***************
*** 820,824 ****
                  GetBCnt: BuildBar 1+ PutBCnt: BuildBar  \ bump count
                  :noname to bfunc
!                 hide !csp
                  ;
  
--- 820,824 ----
                  GetBCnt: BuildBar 1+ PutBCnt: BuildBar  \ bump count
                  :noname to bfunc
!                 !csp
                  ;
  
***************
*** 887,891 ****
  :M GetBheight:  ( -- edit_height )
                  editheight
!                 ;M 
  
  :M StartSize:   ( width height )
--- 887,891 ----
  :M GetBheight:  ( -- edit_height )
                  editheight
!                 ;M
  
  :M StartSize:   ( width height )
***************
*** 949,953 ****
  :M GetBheight:  ( -- edit_height )
                  bheight
!                 ;M 
  
  :M StartSize:   ( width height )
--- 949,953 ----
  :M GetBheight:  ( -- edit_height )
                  bheight
!                 ;M
  
  :M StartSize:   ( width height )

Index: Menu.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/Menu.f,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** Menu.f	25 Jun 2010 21:24:02 -0000	1.7
--- Menu.f	26 Jun 2010 08:24:15 -0000	1.8
***************
*** 262,266 ****
                  NextId to mid
                  :noname to mfunc
!                 hide !csp
                  BREAK_FLAG to BROKEN_FLAG
                  0 to BREAK_FLAG
--- 262,266 ----
                  NextId to mid
                  :noname to mfunc
!                 !csp
                  BREAK_FLAG to BROKEN_FLAG
                  0 to BREAK_FLAG
***************
*** 539,543 ****
                  m"text"
                  :noname to mfunc
!                 ( hide ) !csp
                  ;
  
--- 539,543 ----
                  m"text"
                  :noname to mfunc
!                 !csp
                  ;