WidgetEvent.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Wed, 06 Sep 2017 10:04:18 +0200
branchjv
changeset 8180 25149dfd68e0
parent 7783 601f74796881
permissions -rw-r--r--
Build files: removed a bunch of make rules for long-dead unsupported systems ...in order to unify and simplify the build. If a need to support this ancient systems arose, these hacks may ni longer be needed (due to new versions of tools) or the hacks would have to be written again (better) or retrieved from SCM (worse). Time will show.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
7783
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     1
"
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     2
 COPYRIGHT (c) 2011 by eXept Software AG
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     3
              All Rights Reserved
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     4
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     5
 This software is furnished under a license and may be used
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     6
 only in accordance with the terms of that license and with the
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     7
 inclusion of the above copyright notice.   This software may not
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     8
 be provided or otherwise made available to, or used by, any
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
     9
 other person.  No title to or ownership of the software is
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    10
 hereby transferred.
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    11
"
5753
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
"{ Package: 'stx:libview' }"
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
7783
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    14
"{ NameSpace: Smalltalk }"
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    15
5753
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
WindowEvent subclass:#WidgetEvent
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
	instanceVariableNames:''
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
	classVariableNames:''
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
	poolDictionaries:''
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
	category:'Interface-Support-UI'
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
!
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    23
!WidgetEvent class methodsFor:'documentation'!
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    24
7783
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    25
copyright
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    26
"
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    27
 COPYRIGHT (c) 2011 by eXept Software AG
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    28
              All Rights Reserved
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    29
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    30
 This software is furnished under a license and may be used
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    31
 only in accordance with the terms of that license and with the
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    32
 inclusion of the above copyright notice.   This software may not
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    33
 be provided or otherwise made available to, or used by, any
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    34
 other person.  No title to or ownership of the software is
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    35
 hereby transferred.
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    36
"
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    37
!
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    38
5753
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    39
documentation
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    40
"
5772
16aace2a98ce changed: #documentation
Claus Gittinger <cg@exept.de>
parents: 5753
diff changeset
    41
    Abstract superclass for higher level internal widget events (like menu-selections).
5753
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    42
"
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    43
! !
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    44
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    45
!WidgetEvent methodsFor:'testing'!
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    46
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    47
isWidgetEvent
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    48
    ^ true
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    49
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    50
    "Created: / 29-06-2011 / 12:05:17 / cg"
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    51
! !
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    52
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    53
!WidgetEvent class methodsFor:'documentation'!
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    54
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    55
version_CVS
7783
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    56
    ^ '$Header$'
5753
9935dec4f119 initial checkin
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    57
! !
7783
601f74796881 #DOCUMENTATION by cg
Claus Gittinger <cg@exept.de>
parents: 5772
diff changeset
    58