Tools__WebBrowserPage.st
branchjv
changeset 12401 4714b9640528
parent 12292 ecc23f7c8dde
parent 11789 c6c8e047dc5c
child 12431 9f0c59c742d5
equal deleted inserted replaced
12330:235b77901045 12401:4714b9640528
    63 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
    63 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
    64 OTHER DEALINGS IN THE SOFTWARE.
    64 OTHER DEALINGS IN THE SOFTWARE.
    65 "
    65 "
    66 ! !
    66 ! !
    67 
    67 
       
    68 
    68 !WebBrowserPage class methodsFor:'image specs'!
    69 !WebBrowserPage class methodsFor:'image specs'!
    69 
    70 
    70 hideToolBarIcon
    71 hideToolBarIcon
    71 
    72 
    72     <resource: #image>
    73     <resource: #image>
    73 
    74 
    74     ^ToolbarIconLibrary hideToolbarIcon
    75     ^ToolbarIconLibrary hideToolbarIcon
    75 
    76 
    76     "Created: / 08-06-2011 / 12:09:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    77     "Created: / 08-06-2011 / 12:09:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
    77 ! !
    78 ! !
       
    79 
    78 
    80 
    79 !WebBrowserPage class methodsFor:'interface specs'!
    81 !WebBrowserPage class methodsFor:'interface specs'!
    80 
    82 
    81 contentSpec
    83 contentSpec
    82     "This resource specification was automatically generated
    84     "This resource specification was automatically generated
   285          
   287          
   286         )
   288         )
   287       )
   289       )
   288 ! !
   290 ! !
   289 
   291 
       
   292 
   290 !WebBrowserPage class methodsFor:'menu specs'!
   293 !WebBrowserPage class methodsFor:'menu specs'!
   291 
   294 
   292 toolBarMenu
   295 toolBarMenu
   293     "This resource specification was automatically generated
   296     "This resource specification was automatically generated
   294      by the MenuEditor of ST/X."
   297      by the MenuEditor of ST/X."
   330       )
   333       )
   331 
   334 
   332     "Modified: / 08-11-2011 / 16:42:44 / cg"
   335     "Modified: / 08-11-2011 / 16:42:44 / cg"
   333 ! !
   336 ! !
   334 
   337 
       
   338 
   335 !WebBrowserPage class methodsFor:'plugIn spec'!
   339 !WebBrowserPage class methodsFor:'plugIn spec'!
   336 
   340 
   337 aspectSelectors
   341 aspectSelectors
   338     "This resource specification was automatically generated
   342     "This resource specification was automatically generated
   339      by the UIPainter of ST/X."
   343      by the UIPainter of ST/X."
   349         #urlHolder
   353         #urlHolder
   350       ).
   354       ).
   351 
   355 
   352 ! !
   356 ! !
   353 
   357 
       
   358 
   354 !WebBrowserPage methodsFor:'actions'!
   359 !WebBrowserPage methodsFor:'actions'!
   355 
   360 
   356 hideBookmarkBar
   361 hideBookmarkBar
   357     <resource: #uiCallback>
   362     <resource: #uiCallback>
   358 
   363 
   376     history goTo: bookmark.
   381     history goTo: bookmark.
   377     self urlHolder value: bookmark url.
   382     self urlHolder value: bookmark url.
   378 
   383 
   379     "Created: / 16-06-2011 / 16:10:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   384     "Created: / 16-06-2011 / 16:10:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   380 ! !
   385 ! !
       
   386 
   381 
   387 
   382 !WebBrowserPage methodsFor:'aspects'!
   388 !WebBrowserPage methodsFor:'aspects'!
   383 
   389 
   384 bookmarkBarVisibleHolder
   390 bookmarkBarVisibleHolder
   385     "return/create the 'bookmarkBarVisibleHolder' value holder (automatically generated)"
   391     "return/create the 'bookmarkBarVisibleHolder' value holder (automatically generated)"
   569     "Created: / 07-06-2011 / 22:50:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   575     "Created: / 07-06-2011 / 22:50:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   570     "Modified: / 18-11-2011 / 15:04:27 / cg"
   576     "Modified: / 18-11-2011 / 15:04:27 / cg"
   571     "Modified: / 30-05-2012 / 18:28:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   577     "Modified: / 30-05-2012 / 18:28:27 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   572 ! !
   578 ! !
   573 
   579 
       
   580 
   574 !WebBrowserPage methodsFor:'aspects-queries'!
   581 !WebBrowserPage methodsFor:'aspects-queries'!
   575 
   582 
   576 canGoBackAspect
   583 canGoBackAspect
   577 
   584 
   578     ^(AspectAdaptor forAspect:#canGoBack)                
   585     ^(AspectAdaptor forAspect:#canGoBack)                
   593 
   600 
   594     "Modified: / 21-07-2009 / 22:39:57 / Jan Vrany <vranyj1@fel.cvut.cz>"
   601     "Modified: / 21-07-2009 / 22:39:57 / Jan Vrany <vranyj1@fel.cvut.cz>"
   595     "Created: / 01-09-2009 / 22:39:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   602     "Created: / 01-09-2009 / 22:39:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   596     "Modified: / 08-06-2011 / 12:36:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   603     "Modified: / 08-06-2011 / 12:36:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   597 ! !
   604 ! !
       
   605 
   598 
   606 
   599 !WebBrowserPage methodsFor:'change & update'!
   607 !WebBrowserPage methodsFor:'change & update'!
   600 
   608 
   601 update:something with:aParameter from:changedObject
   609 update:something with:aParameter from:changedObject
   602     "Invoked when an object that I depend upon sends a change notification."
   610     "Invoked when an object that I depend upon sends a change notification."
   694 
   702 
   695     "Created: / 10-06-2011 / 23:55:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   703     "Created: / 10-06-2011 / 23:55:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   696     "Modified: / 18-11-2011 / 15:04:22 / cg"
   704     "Modified: / 18-11-2011 / 15:04:22 / cg"
   697 ! !
   705 ! !
   698 
   706 
       
   707 
   699 !WebBrowserPage methodsFor:'hooks'!
   708 !WebBrowserPage methodsFor:'hooks'!
   700 
   709 
   701 commonPostOpen
   710 commonPostOpen
   702 
   711 
   703     self updateToollBarAndBookmarkBarVisibility
   712     self updateToollBarAndBookmarkBarVisibility
   704 
   713 
   705     "Created: / 11-06-2011 / 00:00:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   714     "Created: / 11-06-2011 / 00:00:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   706 ! !
   715 ! !
       
   716 
   707 
   717 
   708 !WebBrowserPage methodsFor:'initialization'!
   718 !WebBrowserPage methodsFor:'initialization'!
   709 
   719 
   710 initialize
   720 initialize
   711 
   721 
   712     super initialize.
   722     super initialize.
   713     history := NavigationHistory new.
   723     history := NavigationHistory new.
   714 
   724 
   715     "Created: / 08-06-2011 / 12:23:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   725     "Created: / 08-06-2011 / 12:23:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   716 ! !
   726 ! !
       
   727 
   717 
   728 
   718 !WebBrowserPage methodsFor:'menu-actions'!
   729 !WebBrowserPage methodsFor:'menu-actions'!
   719 
   730 
   720 goBack
   731 goBack
   721 
   732 
   739 
   750 
   740     self urlHolder value: bookmark url
   751     self urlHolder value: bookmark url
   741 
   752 
   742     "Created: / 08-06-2011 / 15:01:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   753     "Created: / 08-06-2011 / 15:01:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   743 ! !
   754 ! !
       
   755 
   744 
   756 
   745 !WebBrowserPage methodsFor:'menu-dynamic'!
   757 !WebBrowserPage methodsFor:'menu-dynamic'!
   746 
   758 
   747 goBackMenu
   759 goBackMenu
   748 
   760 
   782     "Modified: / 27-02-2008 / 11:54:27 / janfrog"
   794     "Modified: / 27-02-2008 / 11:54:27 / janfrog"
   783     "Modified: / 08-06-2011 / 15:01:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   795     "Modified: / 08-06-2011 / 15:01:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
   784     "Modified (format): / 09-09-2012 / 13:24:59 / cg"
   796     "Modified (format): / 09-09-2012 / 13:24:59 / cg"
   785 ! !
   797 ! !
   786 
   798 
       
   799 
   787 !WebBrowserPage class methodsFor:'documentation'!
   800 !WebBrowserPage class methodsFor:'documentation'!
   788 
   801 
   789 version
   802 version
   790     ^ '$Header: /cvs/stx/stx/libtool/Tools__WebBrowserPage.st,v 1.8 2012/09/09 19:02:51 cg Exp $'
   803     ^ '$Header: /cvs/stx/stx/libtool/Tools__WebBrowserPage.st,v 1.8 2012-09-09 19:02:51 cg Exp $'
   791 !
   804 !
   792 
   805 
   793 version_CVS
   806 version_CVS
   794     ^ '§Header: /cvs/stx/stx/libtool/Tools__WebBrowserPage.st,v 1.8 2012/09/09 19:02:51 cg Exp §'
   807     ^ '$Header: /cvs/stx/stx/libtool/Tools__WebBrowserPage.st,v 1.8 2012-09-09 19:02:51 cg Exp $'
   795 !
   808 !
   796 
   809 
   797 version_SVN
   810 version_SVN
   798     ^ '$Id: Tools__WebBrowserPage.st 8054 2012-09-13 09:15:20Z vranyj1 $'
   811     ^ '§Id§'
   799 ! !
   812 ! !
       
   813