--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/Tools__DiffCodeView2DemoApp.st Fri Jul 01 15:19:31 2011 +0200
@@ -0,0 +1,272 @@
+"
+ COPYRIGHT (c) 2006 by eXept Software AG
+ All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice. This software may not
+ be provided or otherwise made available to, or used by, any
+ other person. No title to or ownership of the software is
+ hereby transferred.
+"
+"{ Package: 'stx:libtool' }"
+
+"{ NameSpace: Tools }"
+
+ApplicationModel subclass:#DiffCodeView2DemoApp
+ instanceVariableNames:'view'
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Interface-CodeView'
+!
+
+!DiffCodeView2DemoApp class methodsFor:'documentation'!
+
+copyright
+"
+ COPYRIGHT (c) 2006 by eXept Software AG
+ All Rights Reserved
+
+ This software is furnished under a license and may be used
+ only in accordance with the terms of that license and with the
+ inclusion of the above copyright notice. This software may not
+ be provided or otherwise made available to, or used by, any
+ other person. No title to or ownership of the software is
+ hereby transferred.
+"
+! !
+
+!DiffCodeView2DemoApp class methodsFor:'interface specs'!
+
+windowSpec
+ "This resource specification was automatically generated
+ by the UIPainter of ST/X."
+
+ "Do not manually edit this!! If it is corrupted,
+ the UIPainter may not be able to read the specification."
+
+ "
+ UIPainter new openOnClass:Tools::DiffCodeView2DemoApp andSelector:#windowSpec
+ Tools::DiffCodeView2DemoApp new openInterface:#windowSpec
+ Tools::DiffCodeView2DemoApp open
+ "
+
+ <resource: #canvas>
+
+ ^
+ #(FullSpec
+ name: windowSpec
+ window:
+ (WindowSpec
+ label: 'DiffCodeView2 Demo App'
+ name: 'DiffCodeView2 Demo App'
+ min: (Point 0 0)
+ bounds: (Rectangle 0 0 748 375)
+ )
+ component:
+ (SpecCollection
+ collection: (
+ (NonScrollableArbitraryComponentSpec
+ name: 'DiffCodeView2'
+ layout: (LayoutFrame 0 0 0 0 0 1 0 1)
+ component: diffCodeView2
+ )
+ )
+
+ )
+ )
+! !
+
+!DiffCodeView2DemoApp methodsFor:'accessing'!
+
+text1
+
+ ^
+'multipleClassRepositoryDiffBrowserSpec
+ "This resource specification was automatically generated
+ by the UIPainter of ST/X."
+
+ "Do not manually edit this!! If it is corrupted,
+ the UIPainter may not be able to read the specification."
+
+ "
+ UIPainter new openOnClass:NewSystemBrowser andSelector:#multipleClassRepositoryDiffBrowserSpec
+ NewSystemBrowser new openInterface:#multipleClassRepositoryDiffBrowserSpec
+ "
+
+
+
+ ^
+ #(#FullSpec
+ #name: #multipleClassRepositoryDiffBrowserSpec
+
+ #window:
+ #(#WindowSpec
+ #label: ''CCB (Cool Class Browser)''
+ #name: ''ClassBrowser''
+ #min: #(#Point 0 0)
+ #bounds: #(#Rectangle 661 213 1123 513)
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#VariableVerticalPanelSpec
+ #name: ''VariableVerticalPanel1''
+ #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+ #showHandle: false
+ #snapMode: #both
+ #handlePosition: #left
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#SubCanvasSpec
+ #name: ''Navigator''
+ #autoHideScrollBars: false
+ #majorKey: #''NavigatorCanvas''
+
+
+ #minorKey: #multipleClassDiffBrowserSpec
+ )
+ #(#SubCanvasSpec
+ #name: ''DiffView''
+ #hasHorizontalScrollBar: false
+
+
+ #hasVerticalScrollBar: false
+ #majorKey: #VersionDiffBrowser
+ #minorKey: #windowSpec
+ #createNewApplication: true
+ #createNewBuilder: true
+ #postBuildCallback: #versionDiffViewerCreated:
+ )
+ )
+
+ )
+ #handles: #(#Any 0.3 1.0)
+ )
+ )
+
+ )
+ )
+
+
+'
+
+ "Modified: / 22-06-2010 / 22:25:20 / Jakub <zelenja7@fel.cvut.cz>"
+ "Created: / 01-08-2010 / 20:34:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+text2
+
+ ^
+'multipleClassRepositoryDiffBrowserSpec
+ "This resource specification was automatically generated
+ by the UIPainter of ST/X."
+
+ "Do not manually edit this!! If it is corrupted,
+ the UIPainter may not be able to read the specification."
+
+ "
+ UIPainter new openOnClass:NewSystemBrowser andSelector:#multipleClassRepositoryDiffBrowserSpec
+ NewSystemBrowser new openInterface:#multipleClassRepositoryDiffBrowserSpec
+ "
+
+ <resource: #canvas>
+
+ ^
+ #(#FullSpec
+ #name: #multipleClassRepositoryDiffBrowserSpec
+ #window:
+ #(#WindowSpec
+ #label: ''ClassBrowser''
+ #name: ''ClassBrowser''
+ #min: #(#Point 0 0)
+ #bounds: #(#Rectangle 661 213 1123 513)
+ )
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#VariableVerticalPanelSpec
+ #name: ''VariableVerticalPanel1''
+ #layout: #(#LayoutFrame 0 0.0 0 0.0 0 1.0 0 1.0)
+ #showHandle: false
+ #snapMode: #both
+ #handlePosition: #left
+ #component:
+ #(#SpecCollection
+ #collection: #(
+ #(#SubCanvasSpec
+ #name: ''Navigator''
+ #autoHideScrollBars: false
+ #majorKey: #''NavigatorCanvas''
+
+
+ #minorKey: #multipleClassDiffBrowserSpec
+ )
+ #(#SubCanvasSpec
+ #name: ''DiffView''
+ #hasHorizontalScrollBar: false
+
+
+ #hasVerticalScrollBar: false
+ #majorKey: #VersionDiffBrowser
+ #minorKey: #windowSpec
+ #createNewApplication: true
+ #createNewBuilder: true
+ #postBuildCallback: #versionDiffViewerCreated:
+ )
+ )
+
+ )
+ #handles: #(#Any 0.3 1.0)
+ )
+ )
+
+ )
+ )
+
+
+'
+
+ "Created: / 06-03-2010 / 10:39:07 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 22-06-2010 / 22:25:20 / Jakub <zelenja7@fel.cvut.cz>"
+ "Modified: / 08-07-2010 / 15:17:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!DiffCodeView2DemoApp methodsFor:'accessing - views'!
+
+diffCodeView2
+
+ view := DiffCodeView2 new.
+
+ view text1: 'abc
+def' text2: 'def
+ghi'.
+
+"/ view text1: self text1 text2: self text2.
+ ^view
+
+ "Created: / 06-03-2010 / 10:38:35 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified: / 08-07-2010 / 15:29:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!DiffCodeView2DemoApp methodsFor:'hooks'!
+
+commonPostOpen
+
+ [ Delay waitForSeconds: 1.
+ view text1: self text1 text2: self text2
+ ] fork
+
+ "Modified: / 08-07-2010 / 15:27:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!DiffCodeView2DemoApp class methodsFor:'documentation'!
+
+version_CVS
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__DiffCodeView2DemoApp.st,v 1.1 2011-07-01 13:19:31 cg Exp $'
+!
+
+version_SVN
+ ^ '§Id: Tools__DiffCodeView2DemoApp.st 7611 2010-08-01 18:42:05Z vranyj1 §'
+! !