 alterator
------------------

        .
         , 
   (document:insert),      
    (document:surround).

:
(document:surround "/std/base")

         
 (document:envelop)  (document:end-envelop).
     -    
   (   )

:
(document:envelop with-some-properties ...)
....
(document:end-envelop with-some-properties)

        .
      ,    
  ,      .

  -      
  "" (document:subdocument)
 ,         -  .
      ,     
 "" .

:
(document:subdocument "/other" 'param1 'value1)

      ,    
   (global)

        (document:id),
        .

:
(document:id zzz (label "text"))

    ""  ,   
  .

    -  (document:replace),
  ,    (document:popup).
   -  (document:end).


:
(document:popup '/std/yesno 'message "Are you sure")

 document:*    , 
     ?

   "",   
   .
     (with-presentations),
  -  , " "    
     ,   -.

:
(document:envelop with-presentations
                  (label "label" text)
		  (hbox "hbox"))

   ̣ .   
  (with-attributes),   -  ,  
 (-   1).


:
(document:envelop with-attributes
                  (text
		   with
		   height
		   (layout-policy 2)
		   current))

      
(<> <> <> <> ...)

      ,   , 
          :
(<> (<> <  >) ... )

:
(label text "aaa" width 10 layout-policy 100 20)
(hbox (layout-policy 10 20 center))


         
    ,    .

      :
(< -> <    >)
 :
(<> <      >)

:
(my-label text) ;  
(my-label text "new-text") ;  

    ,        
 ,

:
center   'center

      (with-keywords)

:
(document:envelop with-keywords center left yes no)

       -  -.
       ,   listbox
        ,    
   - ,   -    ( ).

         ,  
     ,  -  ""    

:
(my-listbox item-text 3) ;      listbox
(my-listbox count) ;   
(my-listbox item-text "aaa" 2) ;      listbox

 -  (with-meta-attributes),  :
- ,    (- 1),
 -  ""  "".
 -     .
 
:
(with-meta-attributes (count ((meta-get self widget) (length (simple-get widget items)))))


    alterator , , -   ,  
  /std/base         
  

