--- a/Tools__WebBrowserPage.st Fri Nov 18 14:33:21 2011 +0100
+++ b/Tools__WebBrowserPage.st Fri Nov 18 15:05:07 2011 +0100
@@ -527,7 +527,7 @@
webKitView
- webKitView ifNil:[
+ webKitView isNil ifTrue:[
webKitView := WebKitView new
url: self urlHolder;
title: self titleHolder;
@@ -538,6 +538,7 @@
"Created: / 07-06-2011 / 22:50:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 08-06-2011 / 14:26:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 18-11-2011 / 15:04:27 / cg"
! !
!WebBrowserPage methodsFor:'aspects-queries'!
@@ -616,7 +617,7 @@
updateToollBarAndBookmarkBarVisibility
|toolBarVisible toolBar bookmarkBarVisible bookmarkBar pageContent topOffset h|
- builder ifNil:[^self].
+ builder isNil ifTrue:[^self].
toolBar := self componentAt:#ToolBar.
bookmarkBar := self componentAt:#BookmarkBar.
topOffset := 0.
@@ -649,6 +650,7 @@
].
"Created: / 10-06-2011 / 23:55:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 18-11-2011 / 15:04:22 / cg"
! !
!WebBrowserPage methodsFor:'hooks'!
@@ -740,7 +742,7 @@
!WebBrowserPage class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__WebBrowserPage.st,v 1.5 2011-11-08 15:45:45 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__WebBrowserPage.st,v 1.6 2011-11-18 14:05:07 cg Exp $'
!
version_SVN