stx_libwebkit.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Fri, 10 Jun 2011 09:06:56 +0000
changeset 15 f46eba00e7cb
parent 14 28b254c13765
child 18 92189b67e243
permissions -rw-r--r--
- WebKitView now uses bundled uzbl-core - Warning is shown on unsupported platforms
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
1
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     1
"{ Package: 'stx:libwebkit' }"
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     2
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     3
LibraryDefinition subclass:#stx_libwebkit
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     4
	instanceVariableNames:''
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     5
	classVariableNames:''
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     6
	poolDictionaries:''
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     7
	category:'* Projects & Packages *'
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     8
!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
     9
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    10
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    11
!stx_libwebkit class methodsFor:'description'!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    12
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    13
excludedFromPreRequisites
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    14
    "list all packages which should be ignored in the automatic
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    15
     preRequisites scan. See #preRequisites for more."
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    16
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    17
    ^ #(
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    18
    )
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    19
!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    20
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    21
preRequisites
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    22
    "list all required packages.
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    23
     This list can be maintained manually or (better) generated and
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    24
     updated by scanning the superclass hierarchies and looking for
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    25
     global variable accesses. (the browser has a menu function for that)
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    26
     Howevery, often too much is found, and you may want to explicitely
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    27
     exclude individual packages in the #excludedFromPrerequisites method."
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    28
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    29
    ^ #(
13
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    30
        #'stx:libbasic'    "Object - superclass of WebKitView "
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    31
        #'stx:libbasic2'    "Socket - referenced by WebKitRenderer>>spawn "
1
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    32
        #'stx:libview'    "DeviceGraphicsContext - superclass of WebKitView "
13
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    33
        #'stx:libview2'    "ValueHolder - referenced by WebKitView>>title "
2
7e604e6f195e Minor refactoring...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    34
        #'stx:libwidg'    "EditField - referenced by WebKitView class>>open "
1
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    35
    )
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    36
! !
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    37
13
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    38
!stx_libwebkit class methodsFor:'description - compilation'!
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    39
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    40
additionalRules_make_dot_proto
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    41
    "allows for additional rules to be added to the make.proto file."
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    42
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    43
    ^ '
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    44
uzbl/uzbl-core:
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    45
    $(MAKE) -C uzbl uzbl-core
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    46
'
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    47
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    48
    "Created: / 22-08-2006 / 23:59:16 / cg"
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    49
    "Modified: / 09-06-2011 / 14:29:12 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    50
!
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    51
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    52
additionalTargets_make_dot_proto
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    53
    "allows for additional targets to be added to the make.proto file."
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    54
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    55
    ^ 'uzbl/uzbl-core'
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    56
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    57
    "Created: / 22-08-2006 / 23:53:33 / cg"
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    58
    "Modified: / 09-06-2011 / 14:28:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    59
! !
7a0db769b718 added building of uzbl
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 12
diff changeset
    60
1
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    61
!stx_libwebkit class methodsFor:'description - contents'!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    62
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    63
classNamesAndAttributes
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    64
    "lists the classes which are to be included in the project.
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    65
     Each entry in the list may be: a single class-name (symbol),
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    66
     or an array-literal consisting of class name and attributes.
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    67
     Attributes are: #autoload or #<os> where os is one of win32, unix,..."
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    68
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    69
    ^ #(
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    70
        "<className> or (<className> attributes...) in load order"
2
7e604e6f195e Minor refactoring...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    71
        WebKitRenderer
7e604e6f195e Minor refactoring...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 1
diff changeset
    72
        WebKitView
1
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    73
        #'stx_libwebkit'
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    74
    )
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    75
!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    76
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    77
extensionMethodNames
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    78
    "lists the extension methods which are to be included in the project.
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    79
     Entries are 2-element array literals, consisting of class-name and selector."
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    80
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    81
    ^ #(
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    82
    )
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    83
! !
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    84
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    85
!stx_libwebkit class methodsFor:'description - project information'!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    86
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    87
applicationIconFileName
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    88
    "Return the name (without suffix) of an icon-file (the app's icon); will be included in the rc-resource file"
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    89
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    90
    ^ nil
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    91
    "/ ^ self applicationName
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    92
!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    93
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    94
companyName
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    95
    "Return a companyname which will appear in <lib>.rc"
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    96
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    97
    ^ 'eXept Software AG'
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    98
!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
    99
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   100
description
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   101
    "Return a description string which will appear in vc.def / bc.def"
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   102
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   103
    ^ 'Smalltalk/X Class library'
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   104
!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   105
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   106
legalCopyright
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   107
    "Return a copyright string which will appear in <lib>.rc"
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   108
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   109
    ^ 'Copyright Claus Gittinger 1988-2011\nCopyright eXept Software AG 1998-2011'
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   110
!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   111
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   112
productName
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   113
    "Return a product name which will appear in <lib>.rc"
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   114
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   115
    ^ 'Smalltalk/X'
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   116
! !
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   117
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   118
!stx_libwebkit class methodsFor:'description - svn'!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   119
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   120
svnRepositoryUrlString
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   121
    "Return a SVN repository URL of myself.
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   122
     (Generated since 2011-04-08)
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   123
    "        
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   124
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   125
    ^ '$URL$'
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   126
!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   127
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   128
svnRevisionNr
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   129
    "Return a SVN revision number of myself.
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   130
     This number is updated after a commit"
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   131
15
f46eba00e7cb - WebKitView now uses bundled uzbl-core
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 14
diff changeset
   132
    ^ "$SVN-Revision:"'14'"$"
1
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   133
! !
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   134
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   135
!stx_libwebkit class methodsFor:'documentation'!
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   136
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   137
version_SVN
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   138
    ^ '$Id$'
a9c9bb21d650 Initial commit
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
diff changeset
   139
! !