"

 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:#TextDiffTool

	instanceVariableNames:'titleHolder labelAHolder textAHolder labelBHolder textBHolder

		classHolder languageHolder codeAspectHolder showDiffHolder

		diffSpecHolder diffView textAChanged textBChanged codeView'

	classVariableNames:''

	poolDictionaries:''

	category:'Interface-Diff'

!

!TextDiffTool 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.

"

! !

!TextDiffTool class methodsFor:'image specs'!

versionA24x24

    ^ToolbarIconLibrary versionA24x24

    "Created: / 24-03-2010 / 20:49:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

versionB24x24

    ^ToolbarIconLibrary versionB24x24

    "Created: / 24-03-2010 / 20:50:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

versionBase24x24

    ^ToolbarIconLibrary versionBase24x24

    "Created: / 24-03-2010 / 20:50:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"

! !

!TextDiffTool class methodsFor:'interface specs'!

diffSpec

    "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::TextDiffTool andSelector:#diffSpec

     Tools::TextDiffTool new openInterface:#diffSpec

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: diffSpec

        window: 

       (WindowSpec

          label: 'Text Diff Tool (for embedding)'

          name: 'Text Diff Tool (for embedding)'

          min: (Point 10 10)

          bounds: (Rectangle 0 0 782 506)

        )

        component: 

       (SpecCollection

          collection: (

           (ViewSpec

              name: '2Labels'

              layout: (LayoutFrame 0 0 0 0 -16 1 30 0)

              component: 

             (SpecCollection

                collection: (

                 (UISubSpecification

                    name: 'VersionA'

                    layout: (LayoutFrame 0 0 0 0 0 0.5 30 0)

                    minorKey: versionALabelSpec

                  )

                 (UISubSpecification

                    name: 'VersionB'

                    layout: (LayoutFrame 5 0.5 0 0 0 1 30 0)

                    minorKey: versionBLabelSpec

                  )

                 )

              )

            )

           (ArbitraryComponentSpec

              name: 'Diff2TextView'

              layout: (LayoutFrame 0 0 30 0 0 1 0 1)

              hasHorizontalScrollBar: false

              hasVerticalScrollBar: false

              autoHideScrollBars: false

              hasBorder: false

              component: #'Tools::DiffCodeView2'

              postBuildCallback: postBuildDiffView:

            )

           )

        )

      )

!

nothingSpec

    "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::TextDiffTool andSelector:#nothingSpec

     Tools::TextDiffTool new openInterface:#nothingSpec

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: nothingSpec

        window: 

       (WindowSpec

          label: 'NewApplication'

          name: 'NewApplication'

          bounds: (Rectangle 0 0 300 300)

        )

        component: 

       (SpecCollection

          collection: (

           (LabelSpec

              label: 'Nothing selected...'

              name: 'Label1'

              layout: (LayoutFrame 0 0 0 0 0 1 0 1)

              translateLabel: true

            )

           )

        )

      )

!

textViewSpec

    "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::TextDiffTool andSelector:#textViewSpec

     Tools::TextDiffTool new openInterface:#textViewSpec

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: 'textViewSpec'

        window: 

       (WindowSpec

          label: 'Text Only'

          name: 'Text Only'

          min: (Point 10 10)

          bounds: (Rectangle 0 0 782 506)

        )

        component: 

       (SpecCollection

          collection: (

           (ArbitraryComponentSpec

              name: 'CodeView'

              layout: (LayoutFrame 0 0 0 0 0 1 0 1)

              model: textAHolder

              hasHorizontalScrollBar: false

              hasVerticalScrollBar: false

              autoHideScrollBars: false

              hasBorder: false

              component: #'Tools::CodeView2'

              postBuildCallback: postBuildCodeView:

            )

           )

        )

      )

!

versionAOnlySpec

    "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::TextDiffTool andSelector:#versionAOnlySpec

     Tools::TextDiffTool new openInterface:#versionAOnlySpec

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: versionAOnlySpec

        window: 

       (WindowSpec

          label: 'Version A Only'

          name: 'Version A Only'

          min: (Point 10 10)

          bounds: (Rectangle 0 0 782 506)

        )

        component: 

       (SpecCollection

          collection: (

           (UISubSpecification

              name: 'VersionA'

              layout: (LayoutFrame 0 0 0 0 0 1 30 0)

              minorKey: versionALabelSpec

            )

           (UISubSpecification

              name: 'Text'

              layout: (LayoutFrame 0 0 30 0 0 1 0 1)

              minorKey: textViewSpec

            )

           )

        )

      )

!

versionBOnlySpec

    "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::TextDiffTool andSelector:#versionBOnlySpec

     Tools::TextDiffTool new openInterface:#versionBOnlySpec

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: 'versionBOnlySpec'

        window: 

       (WindowSpec

          label: 'Version B Only'

          name: 'Version B Only'

          min: (Point 10 10)

          bounds: (Rectangle 0 0 782 506)

        )

        component: 

       (SpecCollection

          collection: (

           (UISubSpecification

              name: 'VersionB'

              layout: (LayoutFrame 0 0 0 0 0 1 30 0)

              minorKey: versionBLabelSpec

            )

          (UISubSpecification

              name: 'Text'

              layout: (LayoutFrame 0 0 30 0 0 1 0 1)

              minorKey: textViewSpec

            )

           )

        )

      )

    "Created: / 19-07-2011 / 10:06:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

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::TextDiffTool andSelector:#windowSpec

     Tools::TextDiffTool new openInterface:#windowSpec

     Tools::TextDiffTool open

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: windowSpec

        window: 

       (WindowSpec

          label: 'Text Diff Tool'

          name: 'Text Diff Tool'

          labelChannel: titleHolder

          min: (Point 10 10)

          bounds: (Rectangle 0 0 640 480)

        )

        component: 

       (SpecCollection

          collection: (

           (UISubSpecification

              name: 'Contents'

              layout: (LayoutFrame 0 0 0 0 0 1 0 1)

              minorKey: windowSpecForEmbedding

            )

           )

        )

      )

!

windowSpecForEmbedding

    "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::TextDiffTool andSelector:#windowSpecForEmbedding

     Tools::TextDiffTool new openInterface:#windowSpecForEmbedding

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: windowSpecForEmbedding

        window: 

       (WindowSpec

          label: 'Text Diff Tool (for embedding)'

          name: 'Text Diff Tool (for embedding)'

          min: (Point 10 10)

          bounds: (Rectangle 0 0 782 506)

        )

        component: 

       (SpecCollection

          collection: (

           (SubCanvasSpec

              name: 'Contents'

              layout: (LayoutFrame 0 0 0 0 0 1 0 1)

              hasHorizontalScrollBar: false

              hasVerticalScrollBar: false

              specHolder: diffSpecHolder

              createNewBuilder: false

            )

           )

        )

      )

! !

!TextDiffTool class methodsFor:'interface specs - labels'!

versionALabelSpec

    "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:SVN::DiffViewApp andSelector:#versionALabelSpec

     SVN::DiffViewApp new openInterface:#versionALabelSpec

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: versionALabelSpec

        window: 

       (WindowSpec

          label: 'Version A'

          name: 'Version A'

          min: (Point 10 10)

          bounds: (Rectangle 0 0 300 30)

        )

        component: 

       (SpecCollection

          collection: (

           (LabelSpec

              label: 'versionA24x24'

              name: 'VersionAIcon'

              layout: (LayoutFrame 0 0 -12 0.5 27 0 12 0.5)

              hasCharacterOrientedLabel: false

              translateLabel: true

            )

           (LabelSpec

              label: 'Version A'

              name: 'VersionALabel'

              layout: (LayoutFrame 30 0 0 0 0 1 0 1)

              translateLabel: true

              labelChannel: labelAHolder

              resizeForLabel: true

              adjust: left

            )

           )

        )

      )

    "Modified: / 30-06-2011 / 20:53:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

versionBLabelSpec

    "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:SVN::DiffViewApp andSelector:#versionBLabelSpec

     SVN::DiffViewApp new openInterface:#versionBLabelSpec

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: versionBLabelSpec

        window: 

       (WindowSpec

          label: 'Version B'

          name: 'Version B'

          min: (Point 10 10)

          bounds: (Rectangle 0 0 300 30)

        )

        component: 

       (SpecCollection

          collection: (

           (LabelSpec

              label: 'versionB24x24'

              name: 'VersionBIcon'

              layout: (LayoutFrame 0 0 -12 0.5 27 0 12 0.5)

              hasCharacterOrientedLabel: false

              translateLabel: true

            )

           (LabelSpec

              label: 'Version B'

              name: 'VersionBLabel'

              layout: (LayoutFrame 30 0 0 0 0 1 0 1)

              translateLabel: true

              labelChannel: labelBHolder

              resizeForLabel: true

              adjust: left

              useDynamicPreferredWidth: true

              usePreferredWidth: true

            )

           )

        )

      )

    "Modified: / 30-06-2011 / 20:53:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"

!

versionBaseLabelSpec

    "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:SVN::DiffViewApp andSelector:#versionBaseLabelSpec

     SVN::DiffViewApp new openInterface:#versionBaseLabelSpec

    "

    <resource: #canvas>

    ^ 

     #(FullSpec

        name: versionBaseLabelSpec

        window: 

       (WindowSpec

          label: 'Version Base'

          name: 'Version Base'

          min: (Point 10 10)

          bounds: (Rectangle 0 0 300 30)

        )

        component: 

       (SpecCollection

          collection: (

           (LabelSpec

              label: 'versionBase24x24'

              name: 'VersionBaseIcon'

              layout: (LayoutFrame 0 0 -12 0.5 27 0 12 0.5)