jv_statascripteditor.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Tue, 17 Mar 2015 09:07:34 +0000
changeset 3 4fa654e15e0d
parent 0 da028ec9cc07
permissions -rw-r--r--
Implemented "New Window" menu function
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     1
"{ Package: 'jv:statascripteditor' }"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     2
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     3
"{ NameSpace: Smalltalk }"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     4
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     5
ApplicationDefinition subclass:#jv_statascripteditor
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     6
	instanceVariableNames:''
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     7
	classVariableNames:''
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     8
	poolDictionaries:''
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     9
	category:'* Projects & Packages *'
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    10
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    11
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    12
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    13
!jv_statascripteditor class methodsFor:'description'!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    14
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    15
excludedFromPreRequisites
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    16
    "list packages which are to be explicitely excluded from the automatic constructed
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
     prerequisites list. If empty, everything that is found along the inheritance of any of
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
     my classes is considered to be a prerequisite package."
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
    ^ #(
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
    )
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
isGUIApplication
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    25
    "return true, if this is a GUI application.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    26
     (these need more libraries and use a different startup procedure)"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    27
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    28
    ^ true
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    29
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    30
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    31
mandatoryPreRequisites
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    32
    "list packages which are mandatory as a prerequisite.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    33
     This are packages containing superclasses of my classes and classes which
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    34
     are extended by myself.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    35
     They are mandatory, because we need these packages as a prerequisite for loading and compiling.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    36
     This method is generated automatically,
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    37
     by searching along the inheritance chain of all of my classes."
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    38
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    39
    ^ #(
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    40
        #'stx:libbasic'    "ApplicationDefinition - superclass of jv_statascripteditor"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    41
        #'stx:libtool'    "MultiViewToolApplication - superclass of StataScriptEditor"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    42
        #'stx:libview2'    "ApplicationModel - superclass of StataScriptEditor"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    43
    )
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    44
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    45
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    46
referencedPreRequisites
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    47
    "list packages which are a prerequisite, because they contain
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    48
     classes which are referenced by my classes.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    49
     We do not need these packages as a prerequisite for compiling or loading,
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    50
     however, a class from it may be referenced during execution and having it
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    51
     unloaded then may lead to a runtime doesNotUnderstand error, unless the caller
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    52
     includes explicit checks for the package being present.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    53
     This method is generated automatically,
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    54
     by searching all classes (and their packages) which are referenced by my classes."
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    55
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    56
    ^ #(
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    57
        #'stx:libbasic2'    "UUID - referenced by StataScriptEditorMain class>>applicationUUID"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    58
        #'stx:libwidg'    "HVScrollableView - referenced by StataScriptEditor>>createWorkspace"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    59
    )
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    60
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    61
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    62
subProjects
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    63
    "list packages which are known as subprojects.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    64
     This method is generated automatically; however, when generating automatically,
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    65
     packages are only added - never removed, unless listed in #excludedFromSubProjects."
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    66
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    67
    ^ #(
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    68
)
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    69
! !
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    70
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    71
!jv_statascripteditor class methodsFor:'description - contents'!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    72
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    73
classNamesAndAttributes
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    74
    "lists the classes which are to be included in the project.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    75
     Each entry in the list may be: a single class-name (symbol),
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    76
     or an array-literal consisting of class name and attributes.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    77
     Attributes are: #autoload or #<os> where os is one of win32, unix,..."
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    78
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    79
    ^ #(
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    80
        "<className> or (<className> attributes...) in load order"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    81
        StataScriptEditor
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    82
        StataScriptEditorMain
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    83
        StataScriptLogImporter
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    84
        StataScriptLogParser
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    85
        #'jv_statascripteditor'
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    86
    )
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    87
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    88
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    89
extensionMethodNames
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    90
    "list class/selector pairs of extensions.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    91
     A correponding method with real names must be present in my concrete subclasses"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    92
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    93
    ^ #(
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    94
    )
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    95
! !
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    96
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    97
!jv_statascripteditor class methodsFor:'description - project information'!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    98
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    99
applicationIconFileName
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   100
    "Return the name (without suffix) of an icon-file (the app's icon); will be included in the rc-resource file"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   101
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   102
    ^ nil
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   103
    " ^ self applicationName "
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   104
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   105
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   106
companyName
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   107
    "Returns a company string which will appear in <lib>.rc.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   108
     Under win32, this is placed into the dlls file-info"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   109
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   110
    ^ 'Jan Vrany'
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   111
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   112
    "Modified: / 05-02-2015 / 06:31:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   113
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   114
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   115
description
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   116
    "Returns a description string which will appear in nt.def / bc.def"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   117
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   118
    ^ 'Simple Editor for STATA .do files'
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   119
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   120
    "Modified: / 05-02-2015 / 06:31:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   121
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   122
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   123
legalCopyright
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   124
    "Returns a copyright string which will appear in <lib>.rc.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   125
     Under win32, this is placed into the dlls file-info"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   126
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   127
    ^ 'COPYRIGHT (C) 2015 Jan Vrany'
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   128
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   129
    "Modified: / 05-02-2015 / 06:32:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   130
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   131
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   132
productInstallDirBaseName
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   133
    "Returns a default installDir which will appear in <app>.nsi.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   134
     This is usually not the one you want to keep"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   135
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   136
    ^ (self package asCollectionOfSubstringsSeparatedByAny:':/') last
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   137
!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   138
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   139
productName
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   140
    "Returns a product name which will appear in <lib>.rc.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   141
     Under win32, this is placed into the dlls file-info.
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   142
     This method is usually redefined in a concrete application definition"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   143
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   144
    ^ 'Stata Script Editor'
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   145
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   146
    "Modified: / 05-02-2015 / 06:32:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   147
! !
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   148
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   149
!jv_statascripteditor class methodsFor:'description - startup'!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   150
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   151
startupClassName
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   152
    "the class that starts the show in its startupSelector method"
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   153
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   154
    ^ 'StataScriptEditorMain'
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   155
! !
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   156
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   157
!jv_statascripteditor class methodsFor:'documentation'!
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   158
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   159
version_HG
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   160
    ^ '$Changeset: <not expanded> $'
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   161
! !
da028ec9cc07 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   162