Check-in [c63cb009c6]

Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Added a subset package to generate subsets of the icons in package form, by automatic generation through interception of regular package use or manually, through a new tool (icon_selector).
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:c63cb009c65fd386a0278f537b6cc59c1f571a8c
User & Date: andreask 2012-11-07 23:03:15
Context
2012-11-07
23:17
Accepted a number of bugfixes and tweaks by Tobias Schueller. The subset packages now have proper TEApot metadata, for example. check-in: 1ce45b61ee user: andreask tags: trunk
23:03
Added a subset package to generate subsets of the icons in package form, by automatic generation through interception of regular package use or manually, through a new tool (icon_selector). check-in: c63cb009c6 user: andreask tags: trunk
2012-02-07
03:55
First commit, version 1 of all packages, with documentation, etc. check-in: aaa8769d5b user: aku tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to build.tcl.

5
6
7
8
9
10
11




12
13
14
15
16
17
18
...
118
119
120
121
122
123
124
125
126
127
128
129



130
131
132
133
134
135
136
137
138
139
140
141
142
143
144







145
146
147
148
149
150
151
...
167
168
169
170
171
172
173









174
175
176
177
178



179
180
181
182
183
184
185
...
194
195
196
197
198
199
200























201
202
203
204
205






206
207
208
209
210
211
212
set me [file normalize [info script]]
set packages {
    {famfamfam       core.tcl  0}
    {famfamfam_silk  silk.tcl  1}
    {famfamfam_flags flags.tcl 1}
    {famfamfam_mini  mini.tcl  1}
    {famfamfam_mint  mint.tcl  1}




}
proc main {} {
    global argv tcl_platform tag
    set tag {}
    if {![llength $argv]} {
	if {$tcl_platform(platform) eq "windows"} {
	    set argv gui
................................................................................
    set r {}
    foreach c [info commands _*] {
	lappend r [string range $c 1 end]
    }
    puts [lsort -dict $r]
    return
}
proc Hdrop {} { return "?destination?\n\tUninstall all packages.\n\tdestination = path of package directory, default \[info library\]." }
proc _drop {{ldir {}}} {
    global packages
    if {[llength [info level 0]] < 2} {
	set ldir [info library]



    }

    foreach item $packages {

	foreach {dir vfile icons} $item break
	set name $dir
	set src      [file dirname $::me]/$vfile
	set version  [version $src]
	set pkg [string map {_ ::} $dir]

	file delete -force $ldir/$name$version
	puts -nonewline "Removed package:     "
	tag ok
	puts $ldir/$name$version
    }







    return
}
proc Hdoc {} { return "\n\t(Re)Generate the embedded documentation." }
proc _doc {} {
    cd [file dirname $::me]/doc

    puts "Removing old documentation..."
................................................................................
    cd [file dirname $::me]/doc/figures

    # TODO == require dia packages, or dia-as-package
    puts "Generating figures (dia)..."
    exec 2>@ stderr >@ stdout dia convert -t -o . png {*}[glob *.dia]
    return
}









proc Hinstall {} { return "?destination?\n\tInstall all packages.\n\tdestination = path of package directory, default \[info library\]." }
proc _install {{ldir {}}} {
    global packages
    if {$ldir eq {}} {
	set ldir [info library]



    }

    # Create directories, might not exist.
    file mkdir $ldir

    foreach item $packages {
	# Package: /name/
................................................................................
	if {$icons} {
	    file copy -force [file dirname $::me]/[file root $vfile] $ldir/${name}-new
	}

	set    c [open $ldir/${name}-new/pkgIndex.tcl w]
	puts  $c "package ifneeded $pkg $version \[list ::apply {{dir} {source \$dir/$vfile}} \$dir\]"
	close $c
























	file delete -force $ldir/$name$version
	file rename        $ldir/${name}-new     $ldir/$name$version
	puts "Installed package:     $ldir/$name$version"
    }






    return
}
proc Hgui {} { return "\n\tInstall all packages.\n\tDone from a small GUI." }
proc _gui {} {
    global INSTALLPATH
    package require Tk
    package require widget::scrolledwindow







>
>
>
>







 







|

|


>
>
>



<











>
>
>
>
>
>
>







 







>
>
>
>
>
>
>
>
>
|

|


>
>
>







 







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>





>
>
>
>
>
>







5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
...
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139

140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
...
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
...
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
set me [file normalize [info script]]
set packages {
    {famfamfam       core.tcl  0}
    {famfamfam_silk  silk.tcl  1}
    {famfamfam_flags flags.tcl 1}
    {famfamfam_mini  mini.tcl  1}
    {famfamfam_mint  mint.tcl  1}
    {famfamfam_subset subset.tcl 0}
}
set applications {
    icon_selector
}
proc main {} {
    global argv tcl_platform tag
    set tag {}
    if {![llength $argv]} {
	if {$tcl_platform(platform) eq "windows"} {
	    set argv gui
................................................................................
    set r {}
    foreach c [info commands _*] {
	lappend r [string range $c 1 end]
    }
    puts [lsort -dict $r]
    return
}
proc Hdrop {} { return "?destination?\n\tUninstall all packages and applications.\n\tdestination = path of package directory, default \[info library\]." }
proc _drop {{ldir {}}} {
    global packages applications
    if {[llength [info level 0]] < 2} {
	set ldir [info library]
	set bdir [file dirname [info nameofexecutable]]
    } else {
	set bdir [file dirname $ldir]/bin
    }

    foreach item $packages {

	foreach {dir vfile icons} $item break
	set name $dir
	set src      [file dirname $::me]/$vfile
	set version  [version $src]
	set pkg [string map {_ ::} $dir]

	file delete -force $ldir/$name$version
	puts -nonewline "Removed package:     "
	tag ok
	puts $ldir/$name$version
    }

    foreach item $applications {
	file delete -force $bdir/$item
	puts -nonewline "Removed application: "
	tag ok
	puts $bdir/$item
    }
    return
}
proc Hdoc {} { return "\n\t(Re)Generate the embedded documentation." }
proc _doc {} {
    cd [file dirname $::me]/doc

    puts "Removing old documentation..."
................................................................................
    cd [file dirname $::me]/doc/figures

    # TODO == require dia packages, or dia-as-package
    puts "Generating figures (dia)..."
    exec 2>@ stderr >@ stdout dia convert -t -o . png {*}[glob *.dia]
    return
}
proc Hshow-figures {} { return "\n\tShow the figures." }
proc _show-figures {} {
    cd [file dirname $::me]/doc/figures

    # TODO == require dia packages, or dia-as-package
    puts "Showing the figures (dia)..."
    exec 2>@ stderr >@ stdout dia show -t {*}[glob *.dia]
    return
}
proc Hinstall {} { return "?destination?\n\tInstall all packages and applications.\n\tdestination = path of package directory, default \[info library\]." }
proc _install {{ldir {}}} {
    global packages applications
    if {$ldir eq {}} {
	set ldir [info library]
	set bdir [file dirname [info nameofexecutable]]
    } else {
	set bdir [file dirname $ldir]/bin
    }

    # Create directories, might not exist.
    file mkdir $ldir

    foreach item $packages {
	# Package: /name/
................................................................................
	if {$icons} {
	    file copy -force [file dirname $::me]/[file root $vfile] $ldir/${name}-new
	}

	set    c [open $ldir/${name}-new/pkgIndex.tcl w]
	puts  $c "package ifneeded $pkg $version \[list ::apply {{dir} {source \$dir/$vfile}} \$dir\]"
	close $c

	set    c [open $ldir/${name}-new/teapot.txt w]
	puts $c "Package $pkg $version"
	puts $c "Meta platform tcl"
	puts $c "Meta entrykeep ."
	puts $c "Meta included pkgIndex.tcl"
	puts $c "Meta included $vfile"
	puts $c "Meta subject icon famfamfam "
	puts $c "Meta build::date [clock format [clock seconds] -format {%Y-%m-%d}]"
	puts $c "Meta author \{Andreas Kupries\}"
	puts $c "Meta as::origin http://chiselapp.com/user/andreas_kupries/repository/famfamfam/home"
	puts $c "Meta category icons"
	puts $c "Meta license BSD"
	if {$icons} {
	    set icons [file root $vfile]
	    puts $c "Meta require famfamfam"
	    puts $c "Meta subject $icons"
	    puts $c "Meta included $icons"
	    puts $c "Meta description Binding to the famfamfam $icons icon set"
	} else {
	    puts $c "Meta description Common code for the famfamfam icon bindings"
	}
	close $c

	file delete -force $ldir/$name$version
	file rename        $ldir/${name}-new     $ldir/$name$version
	puts "Installed package:     $ldir/$name$version"
    }

    foreach item $applications {
	file copy -force [file dirname $::me]/$item $bdir/${item}-new
	file rename $bdir/${item}-new     $bdir/$item
	puts "Installed application: $bdir/$item"
    }
    return
}
proc Hgui {} { return "\n\tInstall all packages.\n\tDone from a small GUI." }
proc _gui {} {
    global INSTALLPATH
    package require Tk
    package require widget::scrolledwindow

Changes to core.tcl.

16
17
18
19
20
21
22
23
24















25






26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42

43
44
45
46
47


48
49
50
51






52
53
54
55
56
57







58
59
60
61
62








63
64
65
66


67
68

























69
70
71
72
73






74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
package require Tcl 8.5
package require Tk 8.5
package require img::png

namespace eval ::famfamfam {}

# # ## ### ##### ######## ############# #####################
## API
















proc ::famfamfam::Declare {name icondir {pattern *.png}} {






    namespace eval ::famfamfam::$name {
	variable icon
	variable cache
	array set icon  {} ; # Map: icon name -> icon path
	array set cache {} ; # Map: icon name -> Tk image (Cache)
    }

    namespace upvar ::famfamfam::$name \
	icon icon cache cache

    foreach i [glob -directory $icondir $pattern] {
        set iname [file rootname [file tail $i]]
        set icon($iname) $i
    }

    proc ::famfamfam::${name}::get  {icon}        "[list ::famfamfam::Get  $name] \$icon"
    proc ::famfamfam::${name}::list {{pattern *}} "[list ::famfamfam::List $name] \$pattern"


    namespace eval ::famfamfam::$name {
        namespace export get list
        namespace ensemble create
    }


    return
}

proc ::famfamfam::List {iconset {pattern *}} {






    namespace upvar ::famfamfam::$iconset \
	icon icon
    return [array names icon $pattern]
}

proc ::famfamfam::Get {iconset iconname} {







    namespace upvar ::famfamfam::$iconset \
	icon icon cache cache

    if {![info exists icon($iconname)]} {
        return -code error "Bad $iconset icon name \"$iconname\""








    }
    if {![info exists cache($iconname)]} {
        set cache($iconname) [image create photo -file $icon($iconname)]
    }


    return $cache($iconname)
}


























# # ## ### ##### ######## ############# #####################
## Export

namespace eval ::famfamfam {






    namespace export {[a-z]*}
    namespace ensemble create
}

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam 1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:







|

>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
>
>
>
>
>
>










|




|
|
>


|


>
>



|
>
>
>
>
>
>





|
>
>
>
>
>
>
>




|
>
>
>
>
>
>
>
>



|
>
>


>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>





>
>
>
>
>
>







|







16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
package require Tcl 8.5
package require Tk 8.5
package require img::png

namespace eval ::famfamfam {}

# # ## ### ##### ######## ############# #####################
## API.

proc ::famfamfam::intercept {cmdprefix} {
    variable intercept
    if {$cmdprefix eq {}} { set cmdprefix  ::famfamfam::Nop }
    set intercept $cmdprefix
    return
}

proc ::famfamfam::names {} {
    variable known
    return [dict keys $known]
}

# Compatibility alias.
interp alias {} ::famfamfam::Declare {} ::famfamfam::declare

proc ::famfamfam::declare {name icondir {pattern *.png}} {
    variable known
    if {[dict exists $known $name]} {
        return -code error -errorcode {FAMFAMFAM CORE ICONSET KNOWN} \
            "Bad icon set \"$name\", already known"
    }

    namespace eval ::famfamfam::$name {
	variable icon
	variable cache
	array set icon  {} ; # Map: icon name -> icon path
	array set cache {} ; # Map: icon name -> Tk image (Cache)
    }

    namespace upvar ::famfamfam::$name \
	icon icon cache cache

    foreach i [glob -nocomplain -directory $icondir $pattern] {
        set iname [file rootname [file tail $i]]
        set icon($iname) $i
    }

    proc ::famfamfam::${name}::get  {icon}        "[::list ::famfamfam get  $name] \$icon"
    proc ::famfamfam::${name}::list {{pattern *}} "[::list ::famfamfam list $name] \$pattern"
    proc ::famfamfam::${name}::path {icon}        "[::list ::famfamfam path $name] \$icon"

    namespace eval ::famfamfam::$name {
        namespace export get list path
        namespace ensemble create
    }

    dict set known $name .
    return
}

proc ::famfamfam::list {iconset {pattern *}} {
    variable known
    if {![dict exists $known $iconset]} {
        return -code error -errorcode {FAMFAMFAM CORE ICONSET UNKNOWN} \
            "Bad icon set \"$iconset\", not known"
    }

    namespace upvar ::famfamfam::$iconset \
	icon icon
    return [array names icon $pattern]
}

proc ::famfamfam::get {iconset iconname} {
    variable known
    if {![dict exists $known $iconset]} {
        return -code error -errorcode {FAMFAMFAM CORE ICONSET UNKNOWN} \
            "Bad icon set \"$iconset\", not known"
    }

    variable intercept
    namespace upvar ::famfamfam::$iconset \
	icon icon cache cache

    if {![info exists icon($iconname)]} {
        return -code error \
            -errorcode {FAMFAMFAM CORE ICON UNKNOWN} \
            "Bad $iconset icon \"$iconname\", not known"
    }
    # Validate the cache, maybe the image was inadvertently deleted.
    # In that case we have to force regeneration.
    if {[info exists cache($iconname)] &&
        [catch {image type $cache($iconname)}]} {
        unset cache($iconname)
    }
    if {![info exists cache($iconname)]} {
        set cache($iconname) [image create photo -file $icon($iconname)]

        {*}$intercept $iconset $iconname $icon($iconname)
    }
    return $cache($iconname)
}

proc ::famfamfam::path {iconset iconname} {
    variable known
    if {![dict exists $known $iconset]} {
        return -code error -errorcode {FAMFAMFAM CORE ICONSET UNKNOWN} \
            "Bad icon set \"$iconset\", not known"
    }

    namespace upvar ::famfamfam::$iconset \
	icon icon

    if {![info exists icon($iconname)]} {
        return -code error \
            -errorcode {FAMFAMFAM CORE ICON UNKNOWN} \
            "Bad $iconset icon \"$iconname\", not known"
    }

    return $icon($iconname)
}

# # ## ### ##### ######## ############# #####################
## Internal helpers

# Standard reporting hook, doing nothing.
proc ::famfamfam::Nop {args} {}

# # ## ### ##### ######## ############# #####################
## Export

namespace eval ::famfamfam {
    # Set of known icon sets, implemented as dictionary
    variable known {}

    # Callback to report loaded images to.
    variable intercept ::famfamfam::Nop

    namespace export {[a-z]*}
    namespace ensemble create
}

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam 1.1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:

Changes to doc/core.man.

1
2
3
4
5
6
7
8
9
..
13
14
15
16
17
18
19


































20
21
22
23
24
25
26
27
28
29
30
31

32
33

34
35































36
37
38
39
40
41
[comment {-*- tcl -*- --- doctools --- manpage}]
[manpage_begin famfamfam n 1]
[include include/module.inc]
[titledesc {FamFamFam Core}]
[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[description]
[include include/welcome.inc]

[para] This package is internal to the other FamFamFam packages and
................................................................................
[image arch_core]

[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[section API]

[list_begin definitions]
[comment ============================================================]


































[call [cmd ::famfamfam::Declare] [arg name] [arg icondir] [opt [arg pattern]]]

This command registers the icons found in the icon directory
[arg icondir] and matching the [arg pattern] as the icon set
[arg name].

If the [arg pattern] is not specified it defaults to [const *.png].

[para] The command creates the accessor commands
[list_begin enumerated]
[enum][cmd ::famfamfam] [arg name] [method get]
[enum][cmd ::famfamfam] [arg name] [method list]

[list_end]
for the new icon set.


[para] The command returns the empty string as its result.
































[list_end]

[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[include include/feedback.inc]
[manpage_end]

|







 







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|

|









>

|
>


>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>






1
2
3
4
5
6
7
8
9
..
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
[comment {-*- tcl -*- --- doctools --- manpage}]
[manpage_begin famfamfam n 1.1]
[include include/module.inc]
[titledesc {FamFamFam Core}]
[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[description]
[include include/welcome.inc]

[para] This package is internal to the other FamFamFam packages and
................................................................................
[image arch_core]

[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[section API]

[list_begin definitions]
[comment ============================================================]
[call [cmd ::famfamfam] [method intercept] [arg cmdprefix]]

This method adds/removes a callback invoked whenever an image is loaded.

This means that the callback is only invoked the first time an image is
requested and thus not in the in-memory cache yet. Any further requests
served from the cache are not reported.

[para] Setting an empty string as callback deactivates it.

[para] The signature of the callback is

[list_begin definitions]
[call [arg {{*}cmdprefix}] [arg set] [arg name] [arg path]]

The arguments to the callback provide the name of the icon [arg set],
the [arg name] of the icon itself, and the [arg path] the icon was
loaded from.

[para] The result of the callback is ignored.

[para] Any error thrown by the callback will prevent the icon from
being loaded, i.e. the [method get] method of the icon set will be
aborted.

[list_end]

[comment ============================================================]
[call [cmd ::famfamfam] [method names]]

This method returns a list containing the names of all [method declare]d
icon sets.

[comment ============================================================]
[call [cmd ::famfamfam] [method declare] [arg name] [arg icondir] [opt [arg pattern]]]

This method registers the icons found in the icon directory
[arg icondir] and matching the [arg pattern] as the icon set
[arg name].

If the [arg pattern] is not specified it defaults to [const *.png].

[para] The command creates the accessor commands
[list_begin enumerated]
[enum][cmd ::famfamfam] [arg name] [method get]
[enum][cmd ::famfamfam] [arg name] [method list]
[enum][cmd ::famfamfam] [arg name] [method path]
[list_end]
for the new icon set. These are aliases to the core methods below,
with the name of the icon set preset.

[para] The command returns the empty string as its result.

[comment ============================================================]
[call [cmd ::famfamfam::Declare] [arg name] [arg icondir] [opt [arg pattern]]]

This command is an alias of [cmd {famfamfam declare}], available for
compatibility with packages based on the 1.0 API.

[comment ============================================================]
[call [cmd ::famfamfam] [method get] [arg iconset] [arg icon]]

This method returns a Tk image holding the [arg icon] in icon set
[arg iconset]. An error will be thrown if either icon set or icon
are not valid.

[comment ============================================================]
[call [cmd ::famfamfam] [method path] [arg iconset] [arg icon]]

This method returns the path of the image file for the [arg icon]
in icon set [arg iconset]. An error will be thrown if either icon set
or icon are not valid.

[comment ============================================================]
[call [cmd ::famfamfam] [method list] [arg iconset] [opt [arg pattern]]]

This method returns a list containing the names of all valid icons in
the icon set [arg iconset]. An error will be thrown if the
[arg iconset] is not valid.

If the [arg pattern] is specified then only names matching that
pattern are returned. Matching is done by [cmd {string match}],
i.e. the argument is a [term {glob pattern}].

[list_end]

[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[include include/feedback.inc]
[manpage_end]

Added doc/figures/arch_apps.dia.









>
>
>
>
1
2
3
4
# -*- tcl -*- tcl.tk//DSL diagram//EN//1.0
set ::mark 7
source [file join [file dirname [file normalize [info script]]] architecture.dia]
return

Added doc/figures/arch_apps.png.

cannot compute difference between binary files

Changes to doc/figures/arch_core.dia.

1
2
3
4
# -*- tcl -*- tcl.tk//DSL diagram//EN//1.0
set ::mark 5
source [file join [file dirname [file normalize [info script]]] architecture.dia]
return

|


1
2
3
4
# -*- tcl -*- tcl.tk//DSL diagram//EN//1.0
set ::mark 6
source [file join [file dirname [file normalize [info script]]] architecture.dia]
return

Changes to doc/figures/arch_core.png.

cannot compute difference between binary files

Changes to doc/figures/arch_flags.png.

cannot compute difference between binary files

Changes to doc/figures/arch_mini.png.

cannot compute difference between binary files

Changes to doc/figures/arch_mint.dia.

1
2
3
4
# -*- tcl -*- tcl.tk//DSL diagram//EN//1.0
set ::mark 3
source [file join [file dirname [file normalize [info script]]] architecture.dia]
return

|


1
2
3
4
# -*- tcl -*- tcl.tk//DSL diagram//EN//1.0
set ::mark 4
source [file join [file dirname [file normalize [info script]]] architecture.dia]
return

Changes to doc/figures/arch_mint.png.

cannot compute difference between binary files

Changes to doc/figures/arch_silk.dia.

1
2
3
4
# -*- tcl -*- tcl.tk//DSL diagram//EN//1.0
set ::mark 4
source [file join [file dirname [file normalize [info script]]] architecture.dia]
return

|


1
2
3
4
# -*- tcl -*- tcl.tk//DSL diagram//EN//1.0
set ::mark 5
source [file join [file dirname [file normalize [info script]]] architecture.dia]
return

Changes to doc/figures/arch_silk.png.

cannot compute difference between binary files

Added doc/figures/arch_subset.dia.









>
>
>
>
1
2
3
4
# -*- tcl -*- tcl.tk//DSL diagram//EN//1.0
set ::mark 3
source [file join [file dirname [file normalize [info script]]] architecture.dia]
return

Added doc/figures/arch_subset.png.

cannot compute difference between binary files

Changes to doc/figures/architecture.dia.

20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

41
42
43
44
45
46
47
    group {
	text text $label with nw at [last box nw]
    }
    return $E
}

down
set boxwidth   [90 mm]
set movelength  [5 mm]

block {
    set hx [50 mm]
    set IS [area " Icon Sets" height $hx]
    block {
	set fillcolor white
	set boxwidth  [35 mm]
	set boxheight [15 mm]
	east
	xbox famfamfam::flags
	move
	xbox famfamfam::mini

	south ; move
	xbox famfamfam::mint
	west ; move
	xbox famfamfam::silk
    } at $IS
}
group {







|
|












>







20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
    group {
	text text $label with nw at [last box nw]
    }
    return $E
}

down
set boxwidth   [120 mm]
set movelength   [5 mm]

block {
    set hx [50 mm]
    set IS [area " Icon Sets" height $hx]
    block {
	set fillcolor white
	set boxwidth  [35 mm]
	set boxheight [15 mm]
	east
	xbox famfamfam::flags
	move
	xbox famfamfam::mini
	group { move ; xbox famfamfam::subset }
	south ; move
	xbox famfamfam::mint
	west ; move
	xbox famfamfam::silk
    } at $IS
}
group {

Changes to doc/figures/architecture.png.

cannot compute difference between binary files

Changes to doc/figures/pkg_dependencies.dia.

7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28





29
30
31
32
33
34
35
36
37
38
39

40
41
42
43
44
## ====================================================================
## Dependencies, bottom-up, one procedure per package.

proc famfamfam {} { box famfamfam color red }

proc famfamfam_flags {} {
    box famfamfam::flags color red
    group { down ; --- ; r ; --- 5.5 ; d ; ---> } ;# famfamfam
}

proc famfamfam_mini {} {
    box famfamfam::mini color red
    group { down ; --- 0.5 ; r ; --- ; d ; ---> 1.5 ; famfamfam }
}

proc famfamfam_mint {} {
    box famfamfam::mint color red
    group { down ; --- 0.5 ; l ; --- 1.5 ; d ; ---> 1.5 } ;# famfamfam
}

proc famfamfam_silk {} {
    box famfamfam::silk color red





    group { down ; --- ; l ; --- 6 ; d ; ---> } ;# famfamfam
}

## ====================================================================

proc layout {} {
    east
    famfamfam_flags ; move
    famfamfam_mini  ; move
    famfamfam_mint  ; move
    famfamfam_silk

}

## ====================================================================

layout







|




|




|




>
>
>
>
>
|









|
>





7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
## ====================================================================
## Dependencies, bottom-up, one procedure per package.

proc famfamfam {} { box famfamfam color red }

proc famfamfam_flags {} {
    box famfamfam::flags color red
    group { down ; --- ; r ; --- 9 ; d ; ---> 0.5 } ;# famfamfam
}

proc famfamfam_mini {} {
    box famfamfam::mini color red
    group { down ; --- 0.5 ; r ; --- 4 ; d ; ---> } ;# famfamfam
}

proc famfamfam_mint {} {
    box famfamfam::mint color red
    group { down ; ---> 2.5 ; famfamfam }
}

proc famfamfam_silk {} {
    box famfamfam::silk color red
    group { down ; --- 0.5 ; l ; --- 4 ; d ; ---> } ;# famfamfam
}

proc famfamfam_subset {} {
    box famfamfam::subset color red
    group { down ; --- ; l ; --- 9 ; d ; ---> 0.5 } ;# famfamfam
}

## ====================================================================

proc layout {} {
    east
    famfamfam_flags ; move
    famfamfam_mini  ; move
    famfamfam_mint  ; move
    famfamfam_silk  ; move
    famfamfam_subset
}

## ====================================================================

layout

Changes to doc/figures/pkg_dependencies.png.

cannot compute difference between binary files

Changes to doc/include/module.inc.

3
4
5
6
7
8
9
10
[copyright {2012 Documentation, Andreas Kupries}]
[moddesc   {FamFamFam Icon Sets For Tcl}]
[keywords famfamfam icons images]
[category {Icon sets}]
[require Tk 8.5]
[require Tcl 8.5]
[require img::png]
[require famfamfam [opt 1]]







|
3
4
5
6
7
8
9
10
[copyright {2012 Documentation, Andreas Kupries}]
[moddesc   {FamFamFam Icon Sets For Tcl}]
[keywords famfamfam icons images]
[category {Icon sets}]
[require Tk 8.5]
[require Tcl 8.5]
[require img::png]
[require famfamfam [opt 1.1]]

Changes to doc/include/template.inc.

1
2
3
4
5
6
7
8
9
..
32
33
34
35
36
37
38








39
40
41
42
43
44
45
[comment {-*- tcl -*- --- !doctools --- manpage}]
[manpage_begin famfamfam::[vset NAME] n 1]
[include module.inc]
[titledesc "FamFamFam [vset UNAME] Icon Set"]
[keywords "icon set [vset NAME]"]
[keywords "[vset NAME] icons"]
[require famfamfam::[vset NAME] [opt 1]]
[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[description]
................................................................................

This command returns a list containing the names of all valid
[vset NAME] icons accessible through the package.

If the [arg pattern] is specified then only names matching that
pattern are returned. Matching is done by [cmd {string match}],
i.e. the argument is a [term {glob pattern}].









[list_end]

[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[section Examples]

[example_begin]

|







 







>
>
>
>
>
>
>
>







1
2
3
4
5
6
7
8
9
..
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
[comment {-*- tcl -*- --- !doctools --- manpage}]
[manpage_begin famfamfam::[vset NAME] n 1.0.1]
[include module.inc]
[titledesc "FamFamFam [vset UNAME] Icon Set"]
[keywords "icon set [vset NAME]"]
[keywords "[vset NAME] icons"]
[require famfamfam::[vset NAME] [opt 1]]
[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[description]
................................................................................

This command returns a list containing the names of all valid
[vset NAME] icons accessible through the package.

If the [arg pattern] is specified then only names matching that
pattern are returned. Matching is done by [cmd {string match}],
i.e. the argument is a [term {glob pattern}].

[comment ============================================================]
[call [cmd "::famfamfam [vset NAME] path"] [arg name]]

This command returns the absolute path of the file containing the
[vset NAME] icon whose name was specified as argument of the
command. An error will be thrown instead if the [arg name] is not
valid.

[list_end]

[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[section Examples]

[example_begin]

Added doc/license.man.











































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
[comment {-*- tcl -*- doctools manpage}]
[manpage_begin famfamfam_license n 1]
[include include/module.inc]
[titledesc {FamFamFam - License}]
[description]
[include include/welcome.inc]

[para] The packages are under the BSD license.

[section License]

[para] This software is copyrighted by Andreas Kupries and other
parties.  The following terms apply to all files associated with the
software unless explicitly disclaimed in individual files.

[para] The authors hereby grant permission to use, copy, modify,
distribute, and license this software and its documentation for any
purpose, provided that existing copyright notices are retained in all
copies and that this notice is included verbatim in any
distributions. No written agreement, license, or royalty fee is
required for any of the authorized uses.  Modifications to this
software may be copyrighted by their authors and need not follow the
licensing terms described here, provided that the new terms are
clearly indicated on the first page of each file where they apply.

[para] IN NO EVENT SHALL THE AUTHORS OR DISTRIBUTORS BE LIABLE TO ANY
PARTY FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL
DAMAGES ARISING OUT OF THE USE OF THIS SOFTWARE, ITS DOCUMENTATION, OR
ANY DERIVATIVES THEREOF, EVEN IF THE AUTHORS HAVE BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGE.

[para] THE AUTHORS AND DISTRIBUTORS SPECIFICALLY DISCLAIM ANY
WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, AND
NON-INFRINGEMENT.  THIS SOFTWARE IS PROVIDED ON AN "AS IS" BASIS, AND
THE AUTHORS AND DISTRIBUTORS HAVE NO OBLIGATION TO PROVIDE
MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.

[para] GOVERNMENT USE: If you are acquiring this software on behalf of
the U.S. government, the Government shall have only "Restricted
Rights" in the software and related documentation as defined in the
Federal Acquisition Regulations (FARs) in Clause 52.227.19 (c) (2).
If you are acquiring the software on behalf of the Department of
Defense, the software shall be classified as "Commercial Computer
Software" and the Government shall have only "Restricted Rights" as
defined in Clause 252.227-7014 (b) (3) of DFARs.  Notwithstanding the
foregoing, the authors grant the U.S. Government and others acting in
its behalf permission to use and distribute the software in accordance
with the terms specified in this license.

[include include/feedback.inc]
[manpage_end]

Added doc/subset.man.













































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
[comment {-*- tcl -*- --- doctools --- manpage}]
[manpage_begin famfamfam::subset n 1]
[include include/module.inc]
[require famfamfam::subset 1]
[titledesc {FamFamFam Sub Setting}]
[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[description]
[include include/welcome.inc]

[para] This package is a helper to ease the creation of icon packages
which are a subset of one or more icon packages based on the
[package famfamfam] core.

[para] It resides in the Icon Set level of the architecture
[image arch_subset]

[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[section API]

[list_begin definitions]
[comment ============================================================]
[call [cmd ::famfamfam::subset] [method new] [arg name] [arg version] [arg path]]

This method starts the generation of a new icon package, with the
given [arg name] and [arg version].

The package is assembled in the directory [arg path].

The directory will be created if necessary.

[para] The result of the method is the empty string.

[para] An error will be thrown if a package is already in assembly.

[para] After this method has been issued the methods [method save] and
[method done] can be used to add icons to the new package, and to
complete the assembly.

[para] As a side-effect the [package famfamfam] core is configured
with an callback which will automatically [method save] all icons
which are loaded by famfamfam core based packages.

[comment ============================================================]
[call [cmd ::famfamfam::subset] [method save] [arg iconset] [arg name] [arg path]]

This method adds the specified icon to the icon package started with
method [method new].

[para] The result of the method is the empty string.

[para] An error will be thrown if no package is in assembly.

[comment ============================================================]
[call [cmd ::famfamfam::subset] [method done]]

This method completes the generation of the icon package started with
method [method new].

[para] The result of the method is the empty string.

[para] An error will be thrown if no package is in assembly.

[para] The auto-[method save] callback installed by [method new] is
removed.

[list_end]

[comment {% % %% %%% %%%%% %%%%%%%% %%%%%%%%%%%%% %%%%%%%%%%%%%%%%%%%%%}]
[include include/feedback.inc]
[manpage_end]

Changes to embedded/man/files/core.n.

1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253








254
255
256






257
258
259
260
261
262
263
...
264
265
266
267
268
269
270



























271
272
273
274
275
276
277
278
279
280
281
282


283
284
285

286
287






















288
289
290
291
292
293
294
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/core.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam" n 1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam \- FamFamFam Core
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR








.sp
\fB::famfamfam::Declare\fR \fIname\fR \fIicondir\fR ?\fIpattern\fR?
.sp






.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
.PP
................................................................................
This package is internal to the other FamFamFam packages and
provides the common functionality shared by all.
.PP
It resides in the Core level of the architecture
IMAGE: arch_core
.SH API
.TP



























\fB::famfamfam::Declare\fR \fIname\fR \fIicondir\fR ?\fIpattern\fR?
This command registers the icons found in the icon directory
\fIicondir\fR and matching the \fIpattern\fR as the icon set
\fIname\fR.
If the \fIpattern\fR is not specified it defaults to \fB*.png\fR.
.sp
The command creates the accessor commands
.RS
.IP [1]
\fB::famfamfam\fR \fIname\fR \fBget\fR
.IP [2]
\fB::famfamfam\fR \fIname\fR \fBlist\fR


.RE
.IP
for the new icon set.

.sp
The command returns the empty string as its result.






















.PP
.SH "BUGS, IDEAS, FEEDBACK"
This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the \fIFamFamFam Tcl Tracker\fR [http://chiselapp.com/user/andreas_kupries/repository/famfamfam].
Please also report any ideas for enhancements you may have for either
package and/or documentation.

|







 







|










|
>
>
>
>
>
>
>
>



>
>
>
>
>
>







 







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
|










>
>

<
|
>


>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>







1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
...
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326

327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
'\"
'\" Generated from file '/net/nas/data/andreask/Dev/FamFamFam/famfamfam/embedded/man/files/core.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam" n 1.1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam \- FamFamFam Core
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
\fB::famfamfam\fR \fBintercept\fR \fIcmdprefix\fR
.sp
\fI{*}cmdprefix\fR \fIset\fR \fIname\fR \fIpath\fR
.sp
\fB::famfamfam\fR \fBnames\fR
.sp
\fB::famfamfam\fR \fBdeclare\fR \fIname\fR \fIicondir\fR ?\fIpattern\fR?
.sp
\fB::famfamfam::Declare\fR \fIname\fR \fIicondir\fR ?\fIpattern\fR?
.sp
\fB::famfamfam\fR \fBget\fR \fIiconset\fR \fIicon\fR
.sp
\fB::famfamfam\fR \fBpath\fR \fIiconset\fR \fIicon\fR
.sp
\fB::famfamfam\fR \fBlist\fR \fIiconset\fR ?\fIpattern\fR?
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
.PP
................................................................................
This package is internal to the other FamFamFam packages and
provides the common functionality shared by all.
.PP
It resides in the Core level of the architecture
IMAGE: arch_core
.SH API
.TP
\fB::famfamfam\fR \fBintercept\fR \fIcmdprefix\fR
This method adds/removes a callback invoked whenever an image is loaded.
This means that the callback is only invoked the first time an image is
requested and thus not in the in-memory cache yet. Any further requests
served from the cache are not reported.
.sp
Setting an empty string as callback deactivates it.
.sp
The signature of the callback is
.RS
.TP
\fI{*}cmdprefix\fR \fIset\fR \fIname\fR \fIpath\fR
The arguments to the callback provide the name of the icon \fIset\fR,
the \fIname\fR of the icon itself, and the \fIpath\fR the icon was
loaded from.
.sp
The result of the callback is ignored.
.sp
Any error thrown by the callback will prevent the icon from
being loaded, i.e. the \fBget\fR method of the icon set will be
aborted.
.RE
.TP
\fB::famfamfam\fR \fBnames\fR
This method returns a list containing the names of all \fBdeclare\fRd
icon sets.
.TP
\fB::famfamfam\fR \fBdeclare\fR \fIname\fR \fIicondir\fR ?\fIpattern\fR?
This method registers the icons found in the icon directory
\fIicondir\fR and matching the \fIpattern\fR as the icon set
\fIname\fR.
If the \fIpattern\fR is not specified it defaults to \fB*.png\fR.
.sp
The command creates the accessor commands
.RS
.IP [1]
\fB::famfamfam\fR \fIname\fR \fBget\fR
.IP [2]
\fB::famfamfam\fR \fIname\fR \fBlist\fR
.IP [3]
\fB::famfamfam\fR \fIname\fR \fBpath\fR
.RE

for the new icon set. These are aliases to the core methods below,
with the name of the icon set preset.
.sp
The command returns the empty string as its result.
.TP
\fB::famfamfam::Declare\fR \fIname\fR \fIicondir\fR ?\fIpattern\fR?
This command is an alias of \fBfamfamfam declare\fR, available for
compatibility with packages based on the 1.0 API.
.TP
\fB::famfamfam\fR \fBget\fR \fIiconset\fR \fIicon\fR
This method returns a Tk image holding the \fIicon\fR in icon set
\fIiconset\fR. An error will be thrown if either icon set or icon
are not valid.
.TP
\fB::famfamfam\fR \fBpath\fR \fIiconset\fR \fIicon\fR
This method returns the path of the image file for the \fIicon\fR
in icon set \fIiconset\fR. An error will be thrown if either icon set
or icon are not valid.
.TP
\fB::famfamfam\fR \fBlist\fR \fIiconset\fR ?\fIpattern\fR?
This method returns a list containing the names of all valid icons in
the icon set \fIiconset\fR. An error will be thrown if the
\fIiconset\fR is not valid.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.
.PP
.SH "BUGS, IDEAS, FEEDBACK"
This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the \fIFamFamFam Tcl Tracker\fR [http://chiselapp.com/user/andreas_kupries/repository/famfamfam].
Please also report any ideas for enhancements you may have for either
package and/or documentation.

Changes to embedded/man/files/devguide.n.

1
2
3
4
5
6
7
8
9
...
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/devguide.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR

|







 







|







1
2
3
4
5
6
7
8
9
...
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
'\"
'\" Generated from file '/net/nas/data/andreask/Dev/FamFamFam/famfamfam/embedded/man/files/devguide.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR

Changes to embedded/man/files/flags.n.

1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259


260
261
262
263
264
265
266
...
280
281
282
283
284
285
286






287
288
289
290

291
292
293
294
295
296
297
298
299
300
301
302
303
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/flags.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam::flags" n 1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam::flags \- FamFamFam Flags Icon Set
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR
.sp
package require \fBfamfamfam::flags  ?1?\fR
.sp
\fB::famfamfam flags get\fR \fIname\fR
.sp
\fB::famfamfam flags list\fR ?\fIpattern\fR?


.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.TP
\fB::famfamfam flags list\fR ?\fIpattern\fR?
This command returns a list containing the names of all valid
flags icons accessible through the package.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.






.PP
.SH EXAMPLES
.CS



package require famfamfam::flags
set w [famfamfam flags list w*]
set wales [famfamfam flags get wales]

.CE
.SH REFERENCES
.IP [1]
\fIHomepage of the FamFam Flags Icon Set\fR [http://www.famfamfam.com/lab/icons/flags]
.PP
.SH AUTHORS
.IP [1]
Code by Andreas Kupries.

|







 







|










|






>
>







 







>
>
>
>
>
>


<
<
>





|







1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
...
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296


297
298
299
300
301
302
303
304
305
306
307
308
309
310
'\"
'\" Generated from file 'include/template.inc' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam::flags" n 1.0.1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam::flags \- FamFamFam Flags Icon Set
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
package require \fBfamfamfam::flags  ?1?\fR
.sp
\fB::famfamfam flags get\fR \fIname\fR
.sp
\fB::famfamfam flags list\fR ?\fIpattern\fR?
.sp
\fB::famfamfam flags path\fR \fIname\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.TP
\fB::famfamfam flags list\fR ?\fIpattern\fR?
This command returns a list containing the names of all valid
flags icons accessible through the package.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.
.TP
\fB::famfamfam flags path\fR \fIname\fR
This command returns the absolute path of the file containing the
flags icon whose name was specified as argument of the
command. An error will be thrown instead if the \fIname\fR is not
valid.
.PP
.SH EXAMPLES


.nf

package require famfamfam::flags
set w [famfamfam flags list w*]
set wales [famfamfam flags get wales]

.fi
.SH REFERENCES
.IP [1]
\fIHomepage of the FamFam Flags Icon Set\fR [http://www.famfamfam.com/lab/icons/flags]
.PP
.SH AUTHORS
.IP [1]
Code by Andreas Kupries.

Changes to embedded/man/files/installer.n.

1
2
3
4
5
6
7
8
9
...
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
...
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
...
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
...
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/installer.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
mentioned packages, which I recommend, is to download and install
\fIActiveState's\fR [http://www.activestate.com]
\fIActiveTcl\fR [http://www.activestate.com/activetcl] for your platform.
Follow the link for ActiveTcl to find it.
.PP
After the installation of ActiveTcl 8.5 in a directory of your
choice run the command
.CS


    teacup update

.CE
This will install a lot more packages than found in the distribution
alone.
(Disclosure: I, Andreas Kupries, work for ActiveState, maintaining
ActiveTcl and TclDevKit).
.PP
For those wishing to build either Tcl/Tk and/or TkImg on their
own, these can found at
................................................................................
\fIhttp://core.tcl.tk/tk/\fR
.TP
TkImg
\fIhttp://sourceforge.net/projects/tkimg\fR
.PP
.SH "BUILD & INSTALLATION"
To install FamFamFam simply run
.CS


    /path/to/tclsh8.5 /path/to/famfamfam/build.tcl install

.CE
where "\fI/path/to/tclsh8.5\fR" is the tclsh of your Tcl installation, and
"\fI/path/to/famfamfam\fR" the location of the FamFamFam sources on your system.
.PP
This builds all packages and then places them in a directory where the
\fBtclsh8.5\fR will find them.
.PP
On Windows you can invoke the file "\fIbuild.tcl\fR" with a
................................................................................
handling of a double-click is restricted to Windows only however.
.PP
On unix the same GUI is acessible by invoking "\fIbuild.tcl\fR" without
any arguments.
.PP
To get help about the methods of "\fIbuild.tcl\fR", and their complete
syntax, invoke  "\fIbuild.tcl\fR" with argument \fBhelp\fR, i.e., like
.CS


    /path/to/tclsh8.5 /path/to/famfamfam/build.tcl help

.CE
.SH "BUGS, IDEAS, FEEDBACK"
This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the \fIFamFamFam Tcl Tracker\fR [http://chiselapp.com/user/andreas_kupries/repository/famfamfam].
Please also report any ideas for enhancements you may have for either
package and/or documentation.
.SH KEYWORDS

|







 







|







 







|
<



|







 







|
<



|







 







|
<



|







1
2
3
4
5
6
7
8
9
...
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
...
286
287
288
289
290
291
292
293

294
295
296
297
298
299
300
301
302
303
304
...
310
311
312
313
314
315
316
317

318
319
320
321
322
323
324
325
326
327
328
...
331
332
333
334
335
336
337
338

339
340
341
342
343
344
345
346
347
348
349
'\"
'\" Generated from file '/net/nas/data/andreask/Dev/FamFamFam/famfamfam/embedded/man/files/installer.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
mentioned packages, which I recommend, is to download and install
\fIActiveState's\fR [http://www.activestate.com]
\fIActiveTcl\fR [http://www.activestate.com/activetcl] for your platform.
Follow the link for ActiveTcl to find it.
.PP
After the installation of ActiveTcl 8.5 in a directory of your
choice run the command
.nf


    teacup update

.fi
This will install a lot more packages than found in the distribution
alone.
(Disclosure: I, Andreas Kupries, work for ActiveState, maintaining
ActiveTcl and TclDevKit).
.PP
For those wishing to build either Tcl/Tk and/or TkImg on their
own, these can found at
................................................................................
\fIhttp://core.tcl.tk/tk/\fR
.TP
TkImg
\fIhttp://sourceforge.net/projects/tkimg\fR
.PP
.SH "BUILD & INSTALLATION"
To install FamFamFam simply run
.nf


    /path/to/tclsh8.5 /path/to/famfamfam/build.tcl install

.fi
where "\fI/path/to/tclsh8.5\fR" is the tclsh of your Tcl installation, and
"\fI/path/to/famfamfam\fR" the location of the FamFamFam sources on your system.
.PP
This builds all packages and then places them in a directory where the
\fBtclsh8.5\fR will find them.
.PP
On Windows you can invoke the file "\fIbuild.tcl\fR" with a
................................................................................
handling of a double-click is restricted to Windows only however.
.PP
On unix the same GUI is acessible by invoking "\fIbuild.tcl\fR" without
any arguments.
.PP
To get help about the methods of "\fIbuild.tcl\fR", and their complete
syntax, invoke  "\fIbuild.tcl\fR" with argument \fBhelp\fR, i.e., like
.nf


    /path/to/tclsh8.5 /path/to/famfamfam/build.tcl help

.fi
.SH "BUGS, IDEAS, FEEDBACK"
This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the \fIFamFamFam Tcl Tracker\fR [http://chiselapp.com/user/andreas_kupries/repository/famfamfam].
Please also report any ideas for enhancements you may have for either
package and/or documentation.
.SH KEYWORDS

Changes to embedded/man/files/intro.n.

1
2
3
4
5
6
7
8
9
...
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/intro.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR

|







 







|







1
2
3
4
5
6
7
8
9
...
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
'\"
'\" Generated from file '/net/nas/data/andreask/Dev/FamFamFam/famfamfam/embedded/man/files/intro.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR

Added embedded/man/files/license.n.





























































































































































































































































































































































































































































































































































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
'\"
'\" Generated from file '/net/nas/data/andreask/Dev/FamFamFam/famfamfam/embedded/man/files/license.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
'\"	Start paragraph describing an argument to a library procedure.
'\"	type is type of argument (int, etc.), in/out is either "in", "out",
'\"	or "in/out" to describe whether procedure reads or modifies arg,
'\"	and indent is equivalent to second arg of .IP (shouldn't ever be
'\"	needed;  use .AS below instead)
'\"
'\" .AS ?type? ?name?
'\"	Give maximum sizes of arguments for setting tab stops.  Type and
'\"	name are examples of largest possible arguments that will be passed
'\"	to .AP later.  If args are omitted, default tab stops are used.
'\"
'\" .BS
'\"	Start box enclosure.  From here until next .BE, everything will be
'\"	enclosed in one large box.
'\"
'\" .BE
'\"	End of box enclosure.
'\"
'\" .CS
'\"	Begin code excerpt.
'\"
'\" .CE
'\"	End code excerpt.
'\"
'\" .VS ?version? ?br?
'\"	Begin vertical sidebar, for use in marking newly-changed parts
'\"	of man pages.  The first argument is ignored and used for recording
'\"	the version when the .VS was added, so that the sidebars can be
'\"	found and removed when they reach a certain age.  If another argument
'\"	is present, then a line break is forced before starting the sidebar.
'\"
'\" .VE
'\"	End of vertical sidebar.
'\"
'\" .DS
'\"	Begin an indented unfilled display.
'\"
'\" .DE
'\"	End of indented unfilled display.
'\"
'\" .SO
'\"	Start of list of standard options for a Tk widget.  The
'\"	options follow on successive lines, in four columns separated
'\"	by tabs.
'\"
'\" .SE
'\"	End of list of standard options for a Tk widget.
'\"
'\" .OP cmdName dbName dbClass
'\"	Start of description of a specific option.  cmdName gives the
'\"	option's name as specified in the class command, dbName gives
'\"	the option's name in the option database, and dbClass gives
'\"	the option's class in the option database.
'\"
'\" .UL arg1 arg2
'\"	Print arg1 underlined, then print arg2 normally.
'\"
'\" RCS: @(#) $Id: man.macros,v 1.1 2009/01/30 04:56:47 andreas_kupries Exp $
'\"
'\"	# Set up traps and other miscellaneous stuff for Tcl/Tk man pages.
.if t .wh -1.3i ^B
.nr ^l \n(.l
.ad b
'\"	# Start an argument description
.de AP
.ie !"\\$4"" .TP \\$4
.el \{\
.   ie !"\\$2"" .TP \\n()Cu
.   el          .TP 15
.\}
.ta \\n()Au \\n()Bu
.ie !"\\$3"" \{\
\&\\$1	\\fI\\$2\\fP	(\\$3)
.\".b
.\}
.el \{\
.br
.ie !"\\$2"" \{\
\&\\$1	\\fI\\$2\\fP
.\}
.el \{\
\&\\fI\\$1\\fP
.\}
.\}
..
'\"	# define tabbing values for .AP
.de AS
.nr )A 10n
.if !"\\$1"" .nr )A \\w'\\$1'u+3n
.nr )B \\n()Au+15n
.\"
.if !"\\$2"" .nr )B \\w'\\$2'u+\\n()Au+3n
.nr )C \\n()Bu+\\w'(in/out)'u+2n
..
.AS Tcl_Interp Tcl_CreateInterp in/out
'\"	# BS - start boxed text
'\"	# ^y = starting y location
'\"	# ^b = 1
.de BS
.br
.mk ^y
.nr ^b 1u
.if n .nf
.if n .ti 0
.if n \l'\\n(.lu\(ul'
.if n .fi
..
'\"	# BE - end boxed text (draw box now)
.de BE
.nf
.ti 0
.mk ^t
.ie n \l'\\n(^lu\(ul'
.el \{\
.\"	Draw four-sided box normally, but don't draw top of
.\"	box if the box started on an earlier page.
.ie !\\n(^b-1 \{\
\h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul'
.\}
.el \}\
\h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul'
.\}
.\}
.fi
.br
.nr ^b 0
..
'\"	# VS - start vertical sidebar
'\"	# ^Y = starting y location
'\"	# ^v = 1 (for troff;  for nroff this doesn't matter)
.de VS
.if !"\\$2"" .br
.mk ^Y
.ie n 'mc \s12\(br\s0
.el .nr ^v 1u
..
'\"	# VE - end of vertical sidebar
.de VE
.ie n 'mc
.el \{\
.ev 2
.nf
.ti 0
.mk ^t
\h'|\\n(^lu+3n'\L'|\\n(^Yu-1v\(bv'\v'\\n(^tu+1v-\\n(^Yu'\h'-|\\n(^lu+3n'
.sp -1
.fi
.ev
.\}
.nr ^v 0
..
'\"	# Special macro to handle page bottom:  finish off current
'\"	# box/sidebar if in box/sidebar mode, then invoked standard
'\"	# page bottom macro.
.de ^B
.ev 2
'ti 0
'nf
.mk ^t
.if \\n(^b \{\
.\"	Draw three-sided box if this is the box's first page,
.\"	draw two sides but no top otherwise.
.ie !\\n(^b-1 \h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c
.el \h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c
.\}
.if \\n(^v \{\
.nr ^x \\n(^tu+1v-\\n(^Yu
\kx\h'-\\nxu'\h'|\\n(^lu+3n'\ky\L'-\\n(^xu'\v'\\n(^xu'\h'|0u'\c
.\}
.bp
'fi
.ev
.if \\n(^b \{\
.mk ^y
.nr ^b 2
.\}
.if \\n(^v \{\
.mk ^Y
.\}
..
'\"	# DS - begin display
.de DS
.RS
.nf
.sp
..
'\"	# DE - end display
.de DE
.fi
.RE
.sp
..
'\"	# SO - start of list of standard options
.de SO
.SH "STANDARD OPTIONS"
.LP
.nf
.ta 4c 8c 12c
.ft B
..
'\"	# SE - end of list of standard options
.de SE
.fi
.ft R
.LP
See the \\fBoptions\\fR manual entry for details on the standard options.
..
'\"	# OP - start of full description for a single option
.de OP
.LP
.nf
.ta 4c
Command-Line Name:	\\fB\\$1\\fR
Database Name:	\\fB\\$2\\fR
Database Class:	\\fB\\$3\\fR
.fi
.IP
..
'\"	# CS - begin code excerpt
.de CS
.RS
.nf
.ta .25i .5i .75i 1i
..
'\"	# CE - end code excerpt
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam_license" n 1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam_license \- FamFamFam - License
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
.PP
The packages are under the BSD license.
.SH LICENSE
.PP
This software is copyrighted by Andreas Kupries and other
parties.  The following terms apply to all files associated with the
software unless explicitly disclaimed in individual files.
.PP
The authors hereby grant permission to use, copy, modify,
distribute, and license this software and its documentation for any
purpose, provided that existing copyright notices are retained in all
copies and that this notice is included verbatim in any
distributions. No written agreement, license, or royalty fee is
required for any of the authorized uses.  Modifications to this
software may be copyrighted by their authors and need not follow the
licensing terms described here, provided that the new terms are
clearly indicated on the first page of each file where they apply.
.PP
IN NO EVENT SHALL THE AUTHORS OR DISTRIBUTORS BE LIABLE TO ANY
PARTY FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL
DAMAGES ARISING OUT OF THE USE OF THIS SOFTWARE, ITS DOCUMENTATION, OR
ANY DERIVATIVES THEREOF, EVEN IF THE AUTHORS HAVE BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGE.
.PP
THE AUTHORS AND DISTRIBUTORS SPECIFICALLY DISCLAIM ANY
WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, AND
NON-INFRINGEMENT.  THIS SOFTWARE IS PROVIDED ON AN "AS IS" BASIS, AND
THE AUTHORS AND DISTRIBUTORS HAVE NO OBLIGATION TO PROVIDE
MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
.PP
GOVERNMENT USE: If you are acquiring this software on behalf of
the U.S. government, the Government shall have only "Restricted
Rights" in the software and related documentation as defined in the
Federal Acquisition Regulations (FARs) in Clause 52.227.19 (c) (2).
If you are acquiring the software on behalf of the Department of
Defense, the software shall be classified as "Commercial Computer
Software" and the Government shall have only "Restricted Rights" as
defined in Clause 252.227-7014 (b) (3) of DFARs.  Notwithstanding the
foregoing, the authors grant the U.S. Government and others acting in
its behalf permission to use and distribute the software in accordance
with the terms specified in this license.
.SH "BUGS, IDEAS, FEEDBACK"
This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the \fIFamFamFam Tcl Tracker\fR [http://chiselapp.com/user/andreas_kupries/repository/famfamfam].
Please also report any ideas for enhancements you may have for either
package and/or documentation.
.SH KEYWORDS
famfamfam, icons, images
.SH CATEGORY
Icon sets
.SH COPYRIGHT
.nf
Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
Copyright (c) 2012 Documentation, Andreas Kupries

.fi

Changes to embedded/man/files/mini.n.

1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259


260
261
262
263
264
265
266
...
280
281
282
283
284
285
286






287
288
289
290

291
292
293
294
295
296
297
298
299
300
301
302
303
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/mini.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam::mini" n 1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam::mini \- FamFamFam Mini Icon Set
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR
.sp
package require \fBfamfamfam::mini  ?1?\fR
.sp
\fB::famfamfam mini get\fR \fIname\fR
.sp
\fB::famfamfam mini list\fR ?\fIpattern\fR?


.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.TP
\fB::famfamfam mini list\fR ?\fIpattern\fR?
This command returns a list containing the names of all valid
mini icons accessible through the package.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.






.PP
.SH EXAMPLES
.CS



package require famfamfam::mini
set w [famfamfam mini list w*]
set box [famfamfam mini get box]

.CE
.SH REFERENCES
.IP [1]
\fIHomepage of the FamFam Mini Icon Set\fR [http://www.famfamfam.com/lab/icons/mini]
.PP
.SH AUTHORS
.IP [1]
Code by Andreas Kupries.

|







 







|










|






>
>







 







>
>
>
>
>
>


<
<
>





|







1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
...
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296


297
298
299
300
301
302
303
304
305
306
307
308
309
310
'\"
'\" Generated from file 'include/template.inc' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam::mini" n 1.0.1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam::mini \- FamFamFam Mini Icon Set
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
package require \fBfamfamfam::mini  ?1?\fR
.sp
\fB::famfamfam mini get\fR \fIname\fR
.sp
\fB::famfamfam mini list\fR ?\fIpattern\fR?
.sp
\fB::famfamfam mini path\fR \fIname\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.TP
\fB::famfamfam mini list\fR ?\fIpattern\fR?
This command returns a list containing the names of all valid
mini icons accessible through the package.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.
.TP
\fB::famfamfam mini path\fR \fIname\fR
This command returns the absolute path of the file containing the
mini icon whose name was specified as argument of the
command. An error will be thrown instead if the \fIname\fR is not
valid.
.PP
.SH EXAMPLES


.nf

package require famfamfam::mini
set w [famfamfam mini list w*]
set box [famfamfam mini get box]

.fi
.SH REFERENCES
.IP [1]
\fIHomepage of the FamFam Mini Icon Set\fR [http://www.famfamfam.com/lab/icons/mini]
.PP
.SH AUTHORS
.IP [1]
Code by Andreas Kupries.

Changes to embedded/man/files/mint.n.

1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259


260
261
262
263
264
265
266
...
280
281
282
283
284
285
286






287
288
289
290

291
292
293
294
295
296
297
298
299
300
301
302
303
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/mint.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam::mint" n 1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam::mint \- FamFamFam Mint Icon Set
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR
.sp
package require \fBfamfamfam::mint  ?1?\fR
.sp
\fB::famfamfam mint get\fR \fIname\fR
.sp
\fB::famfamfam mint list\fR ?\fIpattern\fR?


.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.TP
\fB::famfamfam mint list\fR ?\fIpattern\fR?
This command returns a list containing the names of all valid
mint icons accessible through the package.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.






.PP
.SH EXAMPLES
.CS



package require famfamfam::mint
set w [famfamfam mint list w*]
set page [famfamfam mint get page]

.CE
.SH REFERENCES
.IP [1]
\fIHomepage of the FamFam Mint Icon Set\fR [http://www.famfamfam.com/lab/icons/mint]
.PP
.SH AUTHORS
.IP [1]
Code by Andreas Kupries.

|







 







|










|






>
>







 







>
>
>
>
>
>


<
<
>





|







1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
...
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296


297
298
299
300
301
302
303
304
305
306
307
308
309
310
'\"
'\" Generated from file 'include/template.inc' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam::mint" n 1.0.1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam::mint \- FamFamFam Mint Icon Set
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
package require \fBfamfamfam::mint  ?1?\fR
.sp
\fB::famfamfam mint get\fR \fIname\fR
.sp
\fB::famfamfam mint list\fR ?\fIpattern\fR?
.sp
\fB::famfamfam mint path\fR \fIname\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.TP
\fB::famfamfam mint list\fR ?\fIpattern\fR?
This command returns a list containing the names of all valid
mint icons accessible through the package.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.
.TP
\fB::famfamfam mint path\fR \fIname\fR
This command returns the absolute path of the file containing the
mint icon whose name was specified as argument of the
command. An error will be thrown instead if the \fIname\fR is not
valid.
.PP
.SH EXAMPLES


.nf

package require famfamfam::mint
set w [famfamfam mint list w*]
set page [famfamfam mint get page]

.fi
.SH REFERENCES
.IP [1]
\fIHomepage of the FamFam Mint Icon Set\fR [http://www.famfamfam.com/lab/icons/mint]
.PP
.SH AUTHORS
.IP [1]
Code by Andreas Kupries.

Changes to embedded/man/files/silk.n.

1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259


260
261
262
263
264
265
266
...
280
281
282
283
284
285
286






287
288
289
290

291
292
293
294
295
296
297
298
299
300
301
302
303
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/silk.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam::silk" n 1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam::silk \- FamFamFam Silk Icon Set
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR
.sp
package require \fBfamfamfam::silk  ?1?\fR
.sp
\fB::famfamfam silk get\fR \fIname\fR
.sp
\fB::famfamfam silk list\fR ?\fIpattern\fR?


.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.TP
\fB::famfamfam silk list\fR ?\fIpattern\fR?
This command returns a list containing the names of all valid
silk icons accessible through the package.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.






.PP
.SH EXAMPLES
.CS



package require famfamfam::silk
set w [famfamfam silk list w*]
set wand [famfamfam silk get wand]

.CE
.SH REFERENCES
.IP [1]
\fIHomepage of the FamFam Silk Icon Set\fR [http://www.famfamfam.com/lab/icons/silk]
.PP
.SH AUTHORS
.IP [1]
Code by Andreas Kupries.

|







 







|










|






>
>







 







>
>
>
>
>
>


<
<
>





|







1
2
3
4
5
6
7
8
9
...
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
...
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296


297
298
299
300
301
302
303
304
305
306
307
308
309
310
'\"
'\" Generated from file 'include/template.inc' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam::silk" n 1.0.1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam::silk \- FamFamFam Silk Icon Set
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
package require \fBfamfamfam::silk  ?1?\fR
.sp
\fB::famfamfam silk get\fR \fIname\fR
.sp
\fB::famfamfam silk list\fR ?\fIpattern\fR?
.sp
\fB::famfamfam silk path\fR \fIname\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.TP
\fB::famfamfam silk list\fR ?\fIpattern\fR?
This command returns a list containing the names of all valid
silk icons accessible through the package.
If the \fIpattern\fR is specified then only names matching that
pattern are returned. Matching is done by \fBstring match\fR,
i.e. the argument is a \fIglob pattern\fR.
.TP
\fB::famfamfam silk path\fR \fIname\fR
This command returns the absolute path of the file containing the
silk icon whose name was specified as argument of the
command. An error will be thrown instead if the \fIname\fR is not
valid.
.PP
.SH EXAMPLES


.nf

package require famfamfam::silk
set w [famfamfam silk list w*]
set wand [famfamfam silk get wand]

.fi
.SH REFERENCES
.IP [1]
\fIHomepage of the FamFam Silk Icon Set\fR [http://www.famfamfam.com/lab/icons/silk]
.PP
.SH AUTHORS
.IP [1]
Code by Andreas Kupries.

Changes to embedded/man/files/sources.n.

1
2
3
4
5
6
7
8
9
...
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
...
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
'\"
'\" Generated from file '/home/aku/Projects/FamFamFam/famfamfam/embedded/man/files/sources.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.SH "SOURCE CODE MANAGEMENT"
For the curious (or a developer-to-be), the sources are managed by the
\fIFossil SCM\fR [http://www.fossil-scm.org].
Binaries for popular platforms can be found directly at its
\fIdownload page\fR [http://www.fossil-scm.org/download.html].
.PP
With that tool available the full history can be retrieved via:
.CS


    fossil clone  http://chiselapp.com/user/andreas_kupries/repository/famfamfam  famfamfam.fossil

.CE
followed by
.CS


    mkdir famfamfam
    cd famfamfam
    fossil open ../famfamfam.fossil

.CE
to get a checkout of the head of the trunk.
.SH "BUGS, IDEAS, FEEDBACK"
This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the \fIFamFamFam Tcl Tracker\fR [http://chiselapp.com/user/andreas_kupries/repository/famfamfam].
Please also report any ideas for enhancements you may have for either
package and/or documentation.

|







 







|







 







|
<



|

|
<





|







1
2
3
4
5
6
7
8
9
...
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
...
291
292
293
294
295
296
297
298

299
300
301
302
303
304

305
306
307
308
309
310
311
312
313
314
315
316
317
'\"
'\" Generated from file '/net/nas/data/andreask/Dev/FamFamFam/famfamfam/embedded/man/files/sources.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
................................................................................
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
................................................................................
.SH "SOURCE CODE MANAGEMENT"
For the curious (or a developer-to-be), the sources are managed by the
\fIFossil SCM\fR [http://www.fossil-scm.org].
Binaries for popular platforms can be found directly at its
\fIdownload page\fR [http://www.fossil-scm.org/download.html].
.PP
With that tool available the full history can be retrieved via:
.nf


    fossil clone  http://chiselapp.com/user/andreas_kupries/repository/famfamfam  famfamfam.fossil

.fi
followed by
.nf


    mkdir famfamfam
    cd famfamfam
    fossil open ../famfamfam.fossil

.fi
to get a checkout of the head of the trunk.
.SH "BUGS, IDEAS, FEEDBACK"
This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the \fIFamFamFam Tcl Tracker\fR [http://chiselapp.com/user/andreas_kupries/repository/famfamfam].
Please also report any ideas for enhancements you may have for either
package and/or documentation.

Added embedded/man/files/subset.n.





















































































































































































































































































































































































































































































































































































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
'\"
'\" Generated from file '/net/nas/data/andreask/Dev/FamFamFam/famfamfam/embedded/man/files/subset.n' by tcllib/doctools with format 'nroff'
'\" Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
'\" Copyright (c) 2012 Documentation, Andreas Kupries
'\"
'\" The definitions below are for supplemental macros used in Tcl/Tk
'\" manual entries.
'\"
'\" .AP type name in/out ?indent?
'\"	Start paragraph describing an argument to a library procedure.
'\"	type is type of argument (int, etc.), in/out is either "in", "out",
'\"	or "in/out" to describe whether procedure reads or modifies arg,
'\"	and indent is equivalent to second arg of .IP (shouldn't ever be
'\"	needed;  use .AS below instead)
'\"
'\" .AS ?type? ?name?
'\"	Give maximum sizes of arguments for setting tab stops.  Type and
'\"	name are examples of largest possible arguments that will be passed
'\"	to .AP later.  If args are omitted, default tab stops are used.
'\"
'\" .BS
'\"	Start box enclosure.  From here until next .BE, everything will be
'\"	enclosed in one large box.
'\"
'\" .BE
'\"	End of box enclosure.
'\"
'\" .CS
'\"	Begin code excerpt.
'\"
'\" .CE
'\"	End code excerpt.
'\"
'\" .VS ?version? ?br?
'\"	Begin vertical sidebar, for use in marking newly-changed parts
'\"	of man pages.  The first argument is ignored and used for recording
'\"	the version when the .VS was added, so that the sidebars can be
'\"	found and removed when they reach a certain age.  If another argument
'\"	is present, then a line break is forced before starting the sidebar.
'\"
'\" .VE
'\"	End of vertical sidebar.
'\"
'\" .DS
'\"	Begin an indented unfilled display.
'\"
'\" .DE
'\"	End of indented unfilled display.
'\"
'\" .SO
'\"	Start of list of standard options for a Tk widget.  The
'\"	options follow on successive lines, in four columns separated
'\"	by tabs.
'\"
'\" .SE
'\"	End of list of standard options for a Tk widget.
'\"
'\" .OP cmdName dbName dbClass
'\"	Start of description of a specific option.  cmdName gives the
'\"	option's name as specified in the class command, dbName gives
'\"	the option's name in the option database, and dbClass gives
'\"	the option's class in the option database.
'\"
'\" .UL arg1 arg2
'\"	Print arg1 underlined, then print arg2 normally.
'\"
'\" RCS: @(#) $Id: man.macros,v 1.1 2009/01/30 04:56:47 andreas_kupries Exp $
'\"
'\"	# Set up traps and other miscellaneous stuff for Tcl/Tk man pages.
.if t .wh -1.3i ^B
.nr ^l \n(.l
.ad b
'\"	# Start an argument description
.de AP
.ie !"\\$4"" .TP \\$4
.el \{\
.   ie !"\\$2"" .TP \\n()Cu
.   el          .TP 15
.\}
.ta \\n()Au \\n()Bu
.ie !"\\$3"" \{\
\&\\$1	\\fI\\$2\\fP	(\\$3)
.\".b
.\}
.el \{\
.br
.ie !"\\$2"" \{\
\&\\$1	\\fI\\$2\\fP
.\}
.el \{\
\&\\fI\\$1\\fP
.\}
.\}
..
'\"	# define tabbing values for .AP
.de AS
.nr )A 10n
.if !"\\$1"" .nr )A \\w'\\$1'u+3n
.nr )B \\n()Au+15n
.\"
.if !"\\$2"" .nr )B \\w'\\$2'u+\\n()Au+3n
.nr )C \\n()Bu+\\w'(in/out)'u+2n
..
.AS Tcl_Interp Tcl_CreateInterp in/out
'\"	# BS - start boxed text
'\"	# ^y = starting y location
'\"	# ^b = 1
.de BS
.br
.mk ^y
.nr ^b 1u
.if n .nf
.if n .ti 0
.if n \l'\\n(.lu\(ul'
.if n .fi
..
'\"	# BE - end boxed text (draw box now)
.de BE
.nf
.ti 0
.mk ^t
.ie n \l'\\n(^lu\(ul'
.el \{\
.\"	Draw four-sided box normally, but don't draw top of
.\"	box if the box started on an earlier page.
.ie !\\n(^b-1 \{\
\h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul'
.\}
.el \}\
\h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\l'|0u-1.5n\(ul'
.\}
.\}
.fi
.br
.nr ^b 0
..
'\"	# VS - start vertical sidebar
'\"	# ^Y = starting y location
'\"	# ^v = 1 (for troff;  for nroff this doesn't matter)
.de VS
.if !"\\$2"" .br
.mk ^Y
.ie n 'mc \s12\(br\s0
.el .nr ^v 1u
..
'\"	# VE - end of vertical sidebar
.de VE
.ie n 'mc
.el \{\
.ev 2
.nf
.ti 0
.mk ^t
\h'|\\n(^lu+3n'\L'|\\n(^Yu-1v\(bv'\v'\\n(^tu+1v-\\n(^Yu'\h'-|\\n(^lu+3n'
.sp -1
.fi
.ev
.\}
.nr ^v 0
..
'\"	# Special macro to handle page bottom:  finish off current
'\"	# box/sidebar if in box/sidebar mode, then invoked standard
'\"	# page bottom macro.
.de ^B
.ev 2
'ti 0
'nf
.mk ^t
.if \\n(^b \{\
.\"	Draw three-sided box if this is the box's first page,
.\"	draw two sides but no top otherwise.
.ie !\\n(^b-1 \h'-1.5n'\L'|\\n(^yu-1v'\l'\\n(^lu+3n\(ul'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c
.el \h'-1.5n'\L'|\\n(^yu-1v'\h'\\n(^lu+3n'\L'\\n(^tu+1v-\\n(^yu'\h'|0u'\c
.\}
.if \\n(^v \{\
.nr ^x \\n(^tu+1v-\\n(^Yu
\kx\h'-\\nxu'\h'|\\n(^lu+3n'\ky\L'-\\n(^xu'\v'\\n(^xu'\h'|0u'\c
.\}
.bp
'fi
.ev
.if \\n(^b \{\
.mk ^y
.nr ^b 2
.\}
.if \\n(^v \{\
.mk ^Y
.\}
..
'\"	# DS - begin display
.de DS
.RS
.nf
.sp
..
'\"	# DE - end display
.de DE
.fi
.RE
.sp
..
'\"	# SO - start of list of standard options
.de SO
.SH "STANDARD OPTIONS"
.LP
.nf
.ta 4c 8c 12c
.ft B
..
'\"	# SE - end of list of standard options
.de SE
.fi
.ft R
.LP
See the \\fBoptions\\fR manual entry for details on the standard options.
..
'\"	# OP - start of full description for a single option
.de OP
.LP
.nf
.ta 4c
Command-Line Name:	\\fB\\$1\\fR
Database Name:	\\fB\\$2\\fR
Database Class:	\\fB\\$3\\fR
.fi
.IP
..
'\"	# CS - begin code excerpt
.de CS
.RS
.nf
.ta .25i .5i .75i 1i
..
'\"	# CE - end code excerpt
.de CE
.fi
.RE
..
.de UL
\\$1\l'|0\(ul'\\$2
..
.TH "famfamfam" n 1 doc "FamFamFam Icon Sets For Tcl"
.BS
.SH NAME
famfamfam \- FamFamFam Sub Setting
.SH SYNOPSIS
package require \fBTk  8.5\fR
.sp
package require \fBTcl  8.5\fR
.sp
package require \fBimg::png \fR
.sp
package require \fBfamfamfam  ?1.1?\fR
.sp
package require \fBfamfamfam::subset  1\fR
.sp
\fB::famfamfam::subset\fR \fBnew\fR \fIname\fR \fIversion\fR \fIpath\fR
.sp
\fB::famfamfam::subset\fR \fBsave\fR \fIiconset\fR \fIname\fR \fIpath\fR
.sp
\fB::famfamfam::subset\fR \fBdone\fR
.sp
.BE
.SH DESCRIPTION
Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
\fIMark James\fR [mailto:mjames@gmail.com], at
\fIhttp://www.famfamfam.com/lab/icons/\fR
.PP
This package is a helper to ease the creation of icon packages
which are a subset of one or more icon packages based on the
\fBfamfamfam\fR core.
.PP
It resides in the Icon Set level of the architecture
IMAGE: arch_subset
.SH API
.TP
\fB::famfamfam::subset\fR \fBnew\fR \fIname\fR \fIversion\fR \fIpath\fR
This method starts the generation of a new icon package, with the
given \fIname\fR and \fIversion\fR.
The package is assembled in the directory \fIpath\fR.
The directory will be created if necessary.
.sp
The result of the method is the empty string.
.sp
An error will be thrown if a package is already in assembly.
.sp
After this method has been issued the methods \fBsave\fR and
\fBdone\fR can be used to add icons to the new package, and to
complete the assembly.
.sp
As a side-effect the \fBfamfamfam\fR core is configured
with an callback which will automatically \fBsave\fR all icons
which are loaded by famfamfam core based packages.
.TP
\fB::famfamfam::subset\fR \fBsave\fR \fIiconset\fR \fIname\fR \fIpath\fR
This method adds the specified icon to the icon package started with
method \fBnew\fR.
.sp
The result of the method is the empty string.
.sp
An error will be thrown if no package is in assembly.
.TP
\fB::famfamfam::subset\fR \fBdone\fR
This method completes the generation of the icon package started with
method \fBnew\fR.
.sp
The result of the method is the empty string.
.sp
An error will be thrown if no package is in assembly.
.sp
The auto-\fBsave\fR callback installed by \fBnew\fR is
removed.
.PP
.SH "BUGS, IDEAS, FEEDBACK"
This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the \fIFamFamFam Tcl Tracker\fR [http://chiselapp.com/user/andreas_kupries/repository/famfamfam].
Please also report any ideas for enhancements you may have for either
package and/or documentation.
.SH KEYWORDS
famfamfam, icons, images
.SH CATEGORY
Icon sets
.SH COPYRIGHT
.nf
Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>
Copyright (c) 2012 Documentation, Andreas Kupries

.fi

Changes to embedded/man/index.n.

254
255
256
257
258
259
260



261
262
263
264
265
266
267
268
269
270
271
272



273
274
275
276
277
278
279
...
314
315
316
317
318
319
320



321
322
323
324
325
326
327
328
329
330
331
332



333
334
335
336
337
338
339
...
344
345
346
347
348
349
350



351
352
353
354
355
356
357
358
359
360
361
362



363
364
365
366
367
368
369
famfamfam::flags
.TP
\fBfiles/installer.n\fR
famfamfam_install_guide
.TP
\fBfiles/intro.n\fR
famfamfam_introduction



.TP
\fBfiles/mini.n\fR
famfamfam::mini
.TP
\fBfiles/mint.n\fR
famfamfam::mint
.TP
\fBfiles/silk.n\fR
famfamfam::silk
.TP
\fBfiles/sources.n\fR
famfamfam_sources



.RE
flags icons
.RS
.TP
\fBfiles/flags.n\fR
famfamfam::flags
.RE
................................................................................
famfamfam::flags
.TP
\fBfiles/installer.n\fR
famfamfam_install_guide
.TP
\fBfiles/intro.n\fR
famfamfam_introduction



.TP
\fBfiles/mini.n\fR
famfamfam::mini
.TP
\fBfiles/mint.n\fR
famfamfam::mint
.TP
\fBfiles/silk.n\fR
famfamfam::silk
.TP
\fBfiles/sources.n\fR
famfamfam_sources



.RE
images
.RS
.TP
\fBfiles/core.n\fR
famfamfam
.TP
................................................................................
famfamfam::flags
.TP
\fBfiles/installer.n\fR
famfamfam_install_guide
.TP
\fBfiles/intro.n\fR
famfamfam_introduction



.TP
\fBfiles/mini.n\fR
famfamfam::mini
.TP
\fBfiles/mint.n\fR
famfamfam::mint
.TP
\fBfiles/silk.n\fR
famfamfam::silk
.TP
\fBfiles/sources.n\fR
famfamfam_sources



.RE
mini icons
.RS
.TP
\fBfiles/mini.n\fR
famfamfam::mini
.RE







>
>
>












>
>
>







 







>
>
>












>
>
>







 







>
>
>












>
>
>







254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
...
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
...
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
famfamfam::flags
.TP
\fBfiles/installer.n\fR
famfamfam_install_guide
.TP
\fBfiles/intro.n\fR
famfamfam_introduction
.TP
\fBfiles/license.n\fR
famfamfam_license
.TP
\fBfiles/mini.n\fR
famfamfam::mini
.TP
\fBfiles/mint.n\fR
famfamfam::mint
.TP
\fBfiles/silk.n\fR
famfamfam::silk
.TP
\fBfiles/sources.n\fR
famfamfam_sources
.TP
\fBfiles/subset.n\fR
famfamfam
.RE
flags icons
.RS
.TP
\fBfiles/flags.n\fR
famfamfam::flags
.RE
................................................................................
famfamfam::flags
.TP
\fBfiles/installer.n\fR
famfamfam_install_guide
.TP
\fBfiles/intro.n\fR
famfamfam_introduction
.TP
\fBfiles/license.n\fR
famfamfam_license
.TP
\fBfiles/mini.n\fR
famfamfam::mini
.TP
\fBfiles/mint.n\fR
famfamfam::mint
.TP
\fBfiles/silk.n\fR
famfamfam::silk
.TP
\fBfiles/sources.n\fR
famfamfam_sources
.TP
\fBfiles/subset.n\fR
famfamfam
.RE
images
.RS
.TP
\fBfiles/core.n\fR
famfamfam
.TP
................................................................................
famfamfam::flags
.TP
\fBfiles/installer.n\fR
famfamfam_install_guide
.TP
\fBfiles/intro.n\fR
famfamfam_introduction
.TP
\fBfiles/license.n\fR
famfamfam_license
.TP
\fBfiles/mini.n\fR
famfamfam::mini
.TP
\fBfiles/mint.n\fR
famfamfam::mint
.TP
\fBfiles/silk.n\fR
famfamfam::silk
.TP
\fBfiles/sources.n\fR
famfamfam_sources
.TP
\fBfiles/subset.n\fR
famfamfam
.RE
mini icons
.RS
.TP
\fBfiles/mini.n\fR
famfamfam::mini
.RE

Changes to embedded/man/toc.n.

244
245
246
247
248
249
250



251
252
253
254
255
256
257
...
264
265
266
267
268
269
270



.TP
\fBfamfamfam_sources\fR
\fIfiles/sources.n\fR: FamFamFam - How To Get The Sources
.TP
\fBfamfamfam_introduction\fR
\fIfiles/intro.n\fR: FamFamFam - Introduction to FamFamFam
.TP



\fBfamfamfam_devguide\fR
\fIfiles/devguide.n\fR: FamFamFam - The Developer's Guide
.TP
\fBfamfamfam_install_guide\fR
\fIfiles/installer.n\fR: FamFamFam - The Installer's Guide
.TP
\fBfamfamfam\fR
................................................................................
\fIfiles/mini.n\fR: FamFamFam Mini Icon Set
.TP
\fBfamfamfam::mint\fR
\fIfiles/mint.n\fR: FamFamFam Mint Icon Set
.TP
\fBfamfamfam::silk\fR
\fIfiles/silk.n\fR: FamFamFam Silk Icon Set










>
>
>







 







>
>
>
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
...
267
268
269
270
271
272
273
274
275
276
.TP
\fBfamfamfam_sources\fR
\fIfiles/sources.n\fR: FamFamFam - How To Get The Sources
.TP
\fBfamfamfam_introduction\fR
\fIfiles/intro.n\fR: FamFamFam - Introduction to FamFamFam
.TP
\fBfamfamfam_license\fR
\fIfiles/license.n\fR: FamFamFam - License
.TP
\fBfamfamfam_devguide\fR
\fIfiles/devguide.n\fR: FamFamFam - The Developer's Guide
.TP
\fBfamfamfam_install_guide\fR
\fIfiles/installer.n\fR: FamFamFam - The Installer's Guide
.TP
\fBfamfamfam\fR
................................................................................
\fIfiles/mini.n\fR: FamFamFam Mini Icon Set
.TP
\fBfamfamfam::mint\fR
\fIfiles/mint.n\fR: FamFamFam Mint Icon Set
.TP
\fBfamfamfam::silk\fR
\fIfiles/silk.n\fR: FamFamFam Silk Icon Set
.TP
\fBfamfamfam\fR
\fIfiles/subset.n\fR: FamFamFam Sub Setting

Changes to embedded/www/doc/files/core.html.

100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
122
123
124
125
126
127
128
129
130
131




132



133
134
135
136
137
138
139
...
141
142
143
144
145
146
147




















148
149
150
151
152
153
154
155
156

157
158

159


















160
161
162
163
164
165
166
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam(n) 1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam - FamFamFam Core</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">




<li><a href="#1"><b class="cmd">::famfamfam::Declare</b> <i class="arg">name</i> <i class="arg">icondir</i> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>



</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
<p>This package is internal to the other FamFamFam packages and
provides the common functionality shared by all.</p>
<p>It resides in the Core level of the architecture
<img alt="arch_core" src="../../image/arch_core.png"></p>
</div>
<div id="section2" class="section"><h2><a name="section2">API</a></h2>
<dl class="definitions">




















<dt><a name="1"><b class="cmd">::famfamfam::Declare</b> <i class="arg">name</i> <i class="arg">icondir</i> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command registers the icons found in the icon directory
<i class="arg">icondir</i> and matching the <i class="arg">pattern</i> as the icon set
<i class="arg">name</i>.
If the <i class="arg">pattern</i> is not specified it defaults to <b class="const">*.png</b>.</p>
<p>The command creates the accessor commands</p>
<ol class="enumerated">
<li><p><b class="cmd">::famfamfam</b> <i class="arg">name</i> <b class="method">get</b></p></li>
<li><p><b class="cmd">::famfamfam</b> <i class="arg">name</i> <b class="method">list</b></p></li>

</ol>
<p>for the new icon set.</p>

<p>The command returns the empty string as its result.</p></dd>


















</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Bugs, Ideas, Feedback</a></h2>
<p>This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the <a href="http://chiselapp.com/user/andreas_kupries/repository/famfamfam">FamFamFam Tcl Tracker</a>.
Please also report any ideas for enhancements you may have for either







|







 







|


>
>
>
>
|
>
>
>







 







>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
|
|







>

|
>

>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>







100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
...
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam(n) 1.1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam - FamFamFam Core</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam</b> <b class="method">intercept</b> <i class="arg">cmdprefix</i></a></li>
<li><a href="#2"><i class="arg">{*}cmdprefix</i> <i class="arg">set</i> <i class="arg">name</i> <i class="arg">path</i></a></li>
<li><a href="#3"><b class="cmd">::famfamfam</b> <b class="method">names</b></a></li>
<li><a href="#4"><b class="cmd">::famfamfam</b> <b class="method">declare</b> <i class="arg">name</i> <i class="arg">icondir</i> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>
<li><a href="#5"><b class="cmd">::famfamfam::Declare</b> <i class="arg">name</i> <i class="arg">icondir</i> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>
<li><a href="#6"><b class="cmd">::famfamfam</b> <b class="method">get</b> <i class="arg">iconset</i> <i class="arg">icon</i></a></li>
<li><a href="#7"><b class="cmd">::famfamfam</b> <b class="method">path</b> <i class="arg">iconset</i> <i class="arg">icon</i></a></li>
<li><a href="#8"><b class="cmd">::famfamfam</b> <b class="method">list</b> <i class="arg">iconset</i> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
<p>This package is internal to the other FamFamFam packages and
provides the common functionality shared by all.</p>
<p>It resides in the Core level of the architecture
<img alt="arch_core" src="../../image/arch_core.png"></p>
</div>
<div id="section2" class="section"><h2><a name="section2">API</a></h2>
<dl class="definitions">
<dt><a name="1"><b class="cmd">::famfamfam</b> <b class="method">intercept</b> <i class="arg">cmdprefix</i></a></dt>
<dd><p>This method adds/removes a callback invoked whenever an image is loaded.
This means that the callback is only invoked the first time an image is
requested and thus not in the in-memory cache yet. Any further requests
served from the cache are not reported.</p>
<p>Setting an empty string as callback deactivates it.</p>
<p>The signature of the callback is</p>
<dl class="definitions">
<dt><a name="2"><i class="arg">{*}cmdprefix</i> <i class="arg">set</i> <i class="arg">name</i> <i class="arg">path</i></a></dt>
<dd><p>The arguments to the callback provide the name of the icon <i class="arg">set</i>,
the <i class="arg">name</i> of the icon itself, and the <i class="arg">path</i> the icon was
loaded from.</p>
<p>The result of the callback is ignored.</p>
<p>Any error thrown by the callback will prevent the icon from
being loaded, i.e. the <b class="method">get</b> method of the icon set will be
aborted.</p></dd>
</dl></dd>
<dt><a name="3"><b class="cmd">::famfamfam</b> <b class="method">names</b></a></dt>
<dd><p>This method returns a list containing the names of all <b class="method">declare</b>d
icon sets.</p></dd>
<dt><a name="4"><b class="cmd">::famfamfam</b> <b class="method">declare</b> <i class="arg">name</i> <i class="arg">icondir</i> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This method registers the icons found in the icon directory
<i class="arg">icondir</i> and matching the <i class="arg">pattern</i> as the icon set
<i class="arg">name</i>.
If the <i class="arg">pattern</i> is not specified it defaults to <b class="const">*.png</b>.</p>
<p>The command creates the accessor commands</p>
<ol class="enumerated">
<li><p><b class="cmd">::famfamfam</b> <i class="arg">name</i> <b class="method">get</b></p></li>
<li><p><b class="cmd">::famfamfam</b> <i class="arg">name</i> <b class="method">list</b></p></li>
<li><p><b class="cmd">::famfamfam</b> <i class="arg">name</i> <b class="method">path</b></p></li>
</ol>
<p>for the new icon set. These are aliases to the core methods below,
with the name of the icon set preset.</p>
<p>The command returns the empty string as its result.</p></dd>
<dt><a name="5"><b class="cmd">::famfamfam::Declare</b> <i class="arg">name</i> <i class="arg">icondir</i> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command is an alias of <b class="cmd">famfamfam declare</b>, available for
compatibility with packages based on the 1.0 API.</p></dd>
<dt><a name="6"><b class="cmd">::famfamfam</b> <b class="method">get</b> <i class="arg">iconset</i> <i class="arg">icon</i></a></dt>
<dd><p>This method returns a Tk image holding the <i class="arg">icon</i> in icon set
<i class="arg">iconset</i>. An error will be thrown if either icon set or icon
are not valid.</p></dd>
<dt><a name="7"><b class="cmd">::famfamfam</b> <b class="method">path</b> <i class="arg">iconset</i> <i class="arg">icon</i></a></dt>
<dd><p>This method returns the path of the image file for the <i class="arg">icon</i>
in icon set <i class="arg">iconset</i>. An error will be thrown if either icon set
or icon are not valid.</p></dd>
<dt><a name="8"><b class="cmd">::famfamfam</b> <b class="method">list</b> <i class="arg">iconset</i> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This method returns a list containing the names of all valid icons in
the icon set <i class="arg">iconset</i>. An error will be thrown if the
<i class="arg">iconset</i> is not valid.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>
</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Bugs, Ideas, Feedback</a></h2>
<p>This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the <a href="http://chiselapp.com/user/andreas_kupries/repository/famfamfam">FamFamFam Tcl Tracker</a>.
Please also report any ideas for enhancements you may have for either

Changes to embedded/www/doc/files/devguide.html.

128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at







|







128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at

Changes to embedded/www/doc/files/flags.html.

88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
125
126
127
128
129
130
131
132
133
134
135
136
137

138
139
140
141
142
143
144
...
157
158
159
160
161
162
163





164
165
166
167
168
169
170
...
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'doc/files/flags.html' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam::flags.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam::flags(n) 1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam::flags - FamFamFam Flags Icon Set</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::flags <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam flags get</b> <i class="arg">name</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam flags list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>

</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
instead if the <i class="arg">name</i> is not valid.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam flags list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command returns a list containing the names of all valid
flags icons accessible through the package.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>





</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Examples</a></h2>
<pre class="example">
package require famfamfam::flags
set w [famfamfam flags list w*]
set wales [famfamfam flags get wales]
................................................................................
<p>This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the <a href="http://chiselapp.com/user/andreas_kupries/repository/famfamfam">FamFamFam Tcl Tracker</a>.
Please also report any ideas for enhancements you may have for either
package and/or documentation.</p>
</div>
<div id="keywords" class="section"><h2><a name="keywords">Keywords</a></h2>
<p><a href="../../index.html#key1">famfamfam</a>, <a href="../../index.html#key7">flags icons</a>, <a href="../../index.html#key8">icon set flags</a>, <a href="../../index.html#key0">icons</a>, <a href="../../index.html#key2">images</a></p>
</div>
<div id="category" class="section"><h2><a name="category">Category</a></h2>
<p>Icon sets</p>
</div>
<div id="copyright" class="section"><h2><a name="copyright">Copyright</a></h2>
<p>Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;<br>
Copyright &copy; 2012 Documentation, Andreas Kupries</p>
</div>
</div></body></html>







|











|







 







|





>







 







>
>
>
>
>







 







|









88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
...
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
...
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'include/template.inc' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam::flags.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam::flags(n) 1.0.1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam::flags - FamFamFam Flags Icon Set</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::flags <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam flags get</b> <i class="arg">name</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam flags list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>
<li><a href="#3"><b class="cmd">::famfamfam flags path</b> <i class="arg">name</i></a></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
instead if the <i class="arg">name</i> is not valid.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam flags list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command returns a list containing the names of all valid
flags icons accessible through the package.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>
<dt><a name="3"><b class="cmd">::famfamfam flags path</b> <i class="arg">name</i></a></dt>
<dd><p>This command returns the absolute path of the file containing the
flags icon whose name was specified as argument of the
command. An error will be thrown instead if the <i class="arg">name</i> is not
valid.</p></dd>
</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Examples</a></h2>
<pre class="example">
package require famfamfam::flags
set w [famfamfam flags list w*]
set wales [famfamfam flags get wales]
................................................................................
<p>This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the <a href="http://chiselapp.com/user/andreas_kupries/repository/famfamfam">FamFamFam Tcl Tracker</a>.
Please also report any ideas for enhancements you may have for either
package and/or documentation.</p>
</div>
<div id="keywords" class="section"><h2><a name="keywords">Keywords</a></h2>
<p><a href="../../index.html#key1">famfamfam</a>, <a href="../../index.html#key9">flags icons</a>, <a href="../../index.html#key10">icon set flags</a>, <a href="../../index.html#key0">icons</a>, <a href="../../index.html#key2">images</a></p>
</div>
<div id="category" class="section"><h2><a name="category">Category</a></h2>
<p>Icon sets</p>
</div>
<div id="copyright" class="section"><h2><a name="copyright">Copyright</a></h2>
<p>Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;<br>
Copyright &copy; 2012 Documentation, Andreas Kupries</p>
</div>
</div></body></html>

Changes to embedded/www/doc/files/installer.html.

127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at







|







127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at

Changes to embedded/www/doc/files/intro.html.

122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at







|







122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at

Added embedded/www/doc/files/license.html.



































































































































































































































































































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193

<html><head>
<title>famfamfam_license - FamFamFam Icon Sets For Tcl</title>
<style type="text/css"><!--
    HTML {
	background: 	#FFFFFF;
	color: 		black;
    }
    BODY {
	background: 	#FFFFFF;
	color:	 	black;
    }
    DIV.doctools {
	margin-left:	10%;
	margin-right:	10%;
    }
    DIV.doctools H1,DIV.doctools H2 {
	margin-left:	-5%;
    }
    H1, H2, H3, H4 {
	margin-top: 	1em;
	font-family:	sans-serif;
	font-size:	large;
	color:		#005A9C;
	background: 	transparent;
	text-align:		left;
    }
    H1.title {
	text-align: center;
    }
    UL,OL {
	margin-right: 0em;
	margin-top: 3pt;
	margin-bottom: 3pt;
    }
    UL LI {
	list-style: disc;
    }
    OL LI {
	list-style: decimal;
    }
    DT {
	padding-top: 	1ex;
    }
    UL.toc,UL.toc UL, UL.toc UL UL {
	font:		normal 12pt/14pt sans-serif;
	list-style:	none;
    }
    LI.section, LI.subsection {
	list-style: 	none;
	margin-left: 	0em;
	text-indent:	0em;
	padding: 	0em;
    }
    PRE {
	display: 	block;
	font-family:	monospace;
	white-space:	pre;
	margin:		0%;
	padding-top:	0.5ex;
	padding-bottom:	0.5ex;
	padding-left:	1ex;
	padding-right:	1ex;
	width:		100%;
    }
    PRE.example {
	color: 		black;
	background: 	#f5dcb3;
	border:		1px solid black;
    }
    UL.requirements LI, UL.syntax LI {
	list-style: 	none;
	margin-left: 	0em;
	text-indent:	0em;
	padding:	0em;
    }
    DIV.synopsis {
	color: 		black;
	background: 	#80ffff;
	border:		1px solid black;
	font-family:	serif;
	margin-top: 	1em;
	margin-bottom: 	1em;
    }
    UL.syntax {
	margin-top: 	1em;
	border-top:	1px solid black;
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'doc/files/license.html' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam_license.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam_license(n) 1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam_license - FamFamFam - License</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
<li class="section"><a href="#section1">Description</a></li>
<li class="section"><a href="#section2">License</a></li>
<li class="section"><a href="#section3">Bugs, Ideas, Feedback</a></li>
<li class="section"><a href="#keywords">Keywords</a></li>
<li class="section"><a href="#category">Category</a></li>
<li class="section"><a href="#copyright">Copyright</a></li>
</ul>
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
<a href="http://www.famfamfam.com/lab/icons/">http://www.famfamfam.com/lab/icons/</a></p>
<p>The packages are under the BSD license.</p>
</div>
<div id="section2" class="section"><h2><a name="section2">License</a></h2>
<p>This software is copyrighted by Andreas Kupries and other
parties.  The following terms apply to all files associated with the
software unless explicitly disclaimed in individual files.</p>
<p>The authors hereby grant permission to use, copy, modify,
distribute, and license this software and its documentation for any
purpose, provided that existing copyright notices are retained in all
copies and that this notice is included verbatim in any
distributions. No written agreement, license, or royalty fee is
required for any of the authorized uses.  Modifications to this
software may be copyrighted by their authors and need not follow the
licensing terms described here, provided that the new terms are
clearly indicated on the first page of each file where they apply.</p>
<p>IN NO EVENT SHALL THE AUTHORS OR DISTRIBUTORS BE LIABLE TO ANY
PARTY FOR DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL
DAMAGES ARISING OUT OF THE USE OF THIS SOFTWARE, ITS DOCUMENTATION, OR
ANY DERIVATIVES THEREOF, EVEN IF THE AUTHORS HAVE BEEN ADVISED OF THE
POSSIBILITY OF SUCH DAMAGE.</p>
<p>THE AUTHORS AND DISTRIBUTORS SPECIFICALLY DISCLAIM ANY
WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, AND
NON-INFRINGEMENT.  THIS SOFTWARE IS PROVIDED ON AN &quot;AS IS&quot; BASIS, AND
THE AUTHORS AND DISTRIBUTORS HAVE NO OBLIGATION TO PROVIDE
MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.</p>
<p>GOVERNMENT USE: If you are acquiring this software on behalf of
the U.S. government, the Government shall have only &quot;Restricted
Rights&quot; in the software and related documentation as defined in the
Federal Acquisition Regulations (FARs) in Clause 52.227.19 (c) (2).
If you are acquiring the software on behalf of the Department of
Defense, the software shall be classified as &quot;Commercial Computer
Software&quot; and the Government shall have only &quot;Restricted Rights&quot; as
defined in Clause 252.227-7014 (b) (3) of DFARs.  Notwithstanding the
foregoing, the authors grant the U.S. Government and others acting in
its behalf permission to use and distribute the software in accordance
with the terms specified in this license.</p>
</div>
<div id="section3" class="section"><h2><a name="section3">Bugs, Ideas, Feedback</a></h2>
<p>This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the <a href="http://chiselapp.com/user/andreas_kupries/repository/famfamfam">FamFamFam Tcl Tracker</a>.
Please also report any ideas for enhancements you may have for either
package and/or documentation.</p>
</div>
<div id="keywords" class="section"><h2><a name="keywords">Keywords</a></h2>
<p><a href="../../index.html#key1">famfamfam</a>, <a href="../../index.html#key0">icons</a>, <a href="../../index.html#key2">images</a></p>
</div>
<div id="category" class="section"><h2><a name="category">Category</a></h2>
<p>Icon sets</p>
</div>
<div id="copyright" class="section"><h2><a name="copyright">Copyright</a></h2>
<p>Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;<br>
Copyright &copy; 2012 Documentation, Andreas Kupries</p>
</div>
</div></body></html>

Changes to embedded/www/doc/files/mini.html.

88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
125
126
127
128
129
130
131
132
133
134
135
136
137

138
139
140
141
142
143
144
...
157
158
159
160
161
162
163





164
165
166
167
168
169
170
...
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'doc/files/mini.html' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam::mini.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam::mini(n) 1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam::mini - FamFamFam Mini Icon Set</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::mini <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam mini get</b> <i class="arg">name</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam mini list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>

</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
instead if the <i class="arg">name</i> is not valid.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam mini list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command returns a list containing the names of all valid
mini icons accessible through the package.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>





</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Examples</a></h2>
<pre class="example">
package require famfamfam::mini
set w [famfamfam mini list w*]
set box [famfamfam mini get box]
................................................................................
<p>This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the <a href="http://chiselapp.com/user/andreas_kupries/repository/famfamfam">FamFamFam Tcl Tracker</a>.
Please also report any ideas for enhancements you may have for either
package and/or documentation.</p>
</div>
<div id="keywords" class="section"><h2><a name="keywords">Keywords</a></h2>
<p><a href="../../index.html#key1">famfamfam</a>, <a href="../../index.html#key10">icon set mini</a>, <a href="../../index.html#key0">icons</a>, <a href="../../index.html#key2">images</a>, <a href="../../index.html#key9">mini icons</a></p>
</div>
<div id="category" class="section"><h2><a name="category">Category</a></h2>
<p>Icon sets</p>
</div>
<div id="copyright" class="section"><h2><a name="copyright">Copyright</a></h2>
<p>Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;<br>
Copyright &copy; 2012 Documentation, Andreas Kupries</p>
</div>
</div></body></html>







|











|







 







|





>







 







>
>
>
>
>







 







|









88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
...
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
...
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'include/template.inc' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam::mini.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam::mini(n) 1.0.1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam::mini - FamFamFam Mini Icon Set</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::mini <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam mini get</b> <i class="arg">name</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam mini list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>
<li><a href="#3"><b class="cmd">::famfamfam mini path</b> <i class="arg">name</i></a></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
instead if the <i class="arg">name</i> is not valid.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam mini list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command returns a list containing the names of all valid
mini icons accessible through the package.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>
<dt><a name="3"><b class="cmd">::famfamfam mini path</b> <i class="arg">name</i></a></dt>
<dd><p>This command returns the absolute path of the file containing the
mini icon whose name was specified as argument of the
command. An error will be thrown instead if the <i class="arg">name</i> is not
valid.</p></dd>
</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Examples</a></h2>
<pre class="example">
package require famfamfam::mini
set w [famfamfam mini list w*]
set box [famfamfam mini get box]
................................................................................
<p>This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the <a href="http://chiselapp.com/user/andreas_kupries/repository/famfamfam">FamFamFam Tcl Tracker</a>.
Please also report any ideas for enhancements you may have for either
package and/or documentation.</p>
</div>
<div id="keywords" class="section"><h2><a name="keywords">Keywords</a></h2>
<p><a href="../../index.html#key1">famfamfam</a>, <a href="../../index.html#key8">icon set mini</a>, <a href="../../index.html#key0">icons</a>, <a href="../../index.html#key2">images</a>, <a href="../../index.html#key7">mini icons</a></p>
</div>
<div id="category" class="section"><h2><a name="category">Category</a></h2>
<p>Icon sets</p>
</div>
<div id="copyright" class="section"><h2><a name="copyright">Copyright</a></h2>
<p>Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;<br>
Copyright &copy; 2012 Documentation, Andreas Kupries</p>
</div>
</div></body></html>

Changes to embedded/www/doc/files/mint.html.

88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
125
126
127
128
129
130
131
132
133
134
135
136
137

138
139
140
141
142
143
144
...
157
158
159
160
161
162
163





164
165
166
167
168
169
170
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'doc/files/mint.html' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam::mint.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam::mint(n) 1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam::mint - FamFamFam Mint Icon Set</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::mint <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam mint get</b> <i class="arg">name</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam mint list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>

</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
instead if the <i class="arg">name</i> is not valid.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam mint list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command returns a list containing the names of all valid
mint icons accessible through the package.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>





</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Examples</a></h2>
<pre class="example">
package require famfamfam::mint
set w [famfamfam mint list w*]
set page [famfamfam mint get page]







|











|







 







|





>







 







>
>
>
>
>







88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
...
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'include/template.inc' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam::mint.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam::mint(n) 1.0.1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam::mint - FamFamFam Mint Icon Set</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::mint <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam mint get</b> <i class="arg">name</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam mint list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>
<li><a href="#3"><b class="cmd">::famfamfam mint path</b> <i class="arg">name</i></a></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
instead if the <i class="arg">name</i> is not valid.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam mint list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command returns a list containing the names of all valid
mint icons accessible through the package.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>
<dt><a name="3"><b class="cmd">::famfamfam mint path</b> <i class="arg">name</i></a></dt>
<dd><p>This command returns the absolute path of the file containing the
mint icon whose name was specified as argument of the
command. An error will be thrown instead if the <i class="arg">name</i> is not
valid.</p></dd>
</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Examples</a></h2>
<pre class="example">
package require famfamfam::mint
set w [famfamfam mint list w*]
set page [famfamfam mint get page]

Changes to embedded/www/doc/files/silk.html.

88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
125
126
127
128
129
130
131
132
133
134
135
136
137

138
139
140
141
142
143
144
...
157
158
159
160
161
162
163





164
165
166
167
168
169
170
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'doc/files/silk.html' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam::silk.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam::silk(n) 1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam::silk - FamFamFam Silk Icon Set</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::silk <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam silk get</b> <i class="arg">name</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam silk list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>

</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
instead if the <i class="arg">name</i> is not valid.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam silk list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command returns a list containing the names of all valid
silk icons accessible through the package.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>





</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Examples</a></h2>
<pre class="example">
package require famfamfam::silk
set w [famfamfam silk list w*]
set wand [famfamfam silk get wand]







|











|







 







|





>







 







>
>
>
>
>







88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
...
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
...
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'include/template.inc' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam::silk.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam::silk(n) 1.0.1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam::silk - FamFamFam Silk Icon Set</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
................................................................................
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::silk <span class="opt">?1?</span></b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam silk get</b> <i class="arg">name</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam silk list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></li>
<li><a href="#3"><b class="cmd">::famfamfam silk path</b> <i class="arg">name</i></a></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
................................................................................
instead if the <i class="arg">name</i> is not valid.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam silk list</b> <span class="opt">?<i class="arg">pattern</i>?</span></a></dt>
<dd><p>This command returns a list containing the names of all valid
silk icons accessible through the package.
If the <i class="arg">pattern</i> is specified then only names matching that
pattern are returned. Matching is done by <b class="cmd">string match</b>,
i.e. the argument is a <i class="term">glob pattern</i>.</p></dd>
<dt><a name="3"><b class="cmd">::famfamfam silk path</b> <i class="arg">name</i></a></dt>
<dd><p>This command returns the absolute path of the file containing the
silk icon whose name was specified as argument of the
command. An error will be thrown instead if the <i class="arg">name</i> is not
valid.</p></dd>
</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Examples</a></h2>
<pre class="example">
package require famfamfam::silk
set w [famfamfam silk list w*]
set wand [famfamfam silk get wand]

Changes to embedded/www/doc/files/sources.html.

124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at







|







124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at

Added embedded/www/doc/files/subset.html.









































































































































































































































































































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196

<html><head>
<title>famfamfam - FamFamFam Icon Sets For Tcl</title>
<style type="text/css"><!--
    HTML {
	background: 	#FFFFFF;
	color: 		black;
    }
    BODY {
	background: 	#FFFFFF;
	color:	 	black;
    }
    DIV.doctools {
	margin-left:	10%;
	margin-right:	10%;
    }
    DIV.doctools H1,DIV.doctools H2 {
	margin-left:	-5%;
    }
    H1, H2, H3, H4 {
	margin-top: 	1em;
	font-family:	sans-serif;
	font-size:	large;
	color:		#005A9C;
	background: 	transparent;
	text-align:		left;
    }
    H1.title {
	text-align: center;
    }
    UL,OL {
	margin-right: 0em;
	margin-top: 3pt;
	margin-bottom: 3pt;
    }
    UL LI {
	list-style: disc;
    }
    OL LI {
	list-style: decimal;
    }
    DT {
	padding-top: 	1ex;
    }
    UL.toc,UL.toc UL, UL.toc UL UL {
	font:		normal 12pt/14pt sans-serif;
	list-style:	none;
    }
    LI.section, LI.subsection {
	list-style: 	none;
	margin-left: 	0em;
	text-indent:	0em;
	padding: 	0em;
    }
    PRE {
	display: 	block;
	font-family:	monospace;
	white-space:	pre;
	margin:		0%;
	padding-top:	0.5ex;
	padding-bottom:	0.5ex;
	padding-left:	1ex;
	padding-right:	1ex;
	width:		100%;
    }
    PRE.example {
	color: 		black;
	background: 	#f5dcb3;
	border:		1px solid black;
    }
    UL.requirements LI, UL.syntax LI {
	list-style: 	none;
	margin-left: 	0em;
	text-indent:	0em;
	padding:	0em;
    }
    DIV.synopsis {
	color: 		black;
	background: 	#80ffff;
	border:		1px solid black;
	font-family:	serif;
	margin-top: 	1em;
	margin-bottom: 	1em;
    }
    UL.syntax {
	margin-top: 	1em;
	border-top:	1px solid black;
    }
    UL.requirements {
	margin-bottom: 	1em;
	border-bottom:	1px solid black;
    }
--></style>
</head>
<! -- Generated from file 'doc/files/subset.html' by tcllib/doctools with format 'html'
   -->
<! -- Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;   -- Copyright &copy; 2012 Documentation, Andreas Kupries
   -->
<! -- CVS: $Id$ famfamfam.n
   -->
<body><div class="doctools">
<hr> [
  <a href="../../toc.html">Main Table Of Contents</a>
| <a href="../toc.html">Table Of Contents</a>
| <a href="../../index.html">Keyword Index</a>
] <hr>
<h1 class="title">famfamfam(n) 1 doc &quot;FamFamFam Icon Sets For Tcl&quot;</h1>
<div id="name" class="section"><h2><a name="name">Name</a></h2>
<p>famfamfam - FamFamFam Sub Setting</p>
</div>
<div id="toc" class="section"><h2><a name="toc">Table Of Contents</a></h2>
<ul class="toc">
<li class="section"><a href="#toc">Table Of Contents</a></li>
<li class="section"><a href="#synopsis">Synopsis</a></li>
<li class="section"><a href="#section1">Description</a></li>
<li class="section"><a href="#section2">API</a></li>
<li class="section"><a href="#section3">Bugs, Ideas, Feedback</a></li>
<li class="section"><a href="#keywords">Keywords</a></li>
<li class="section"><a href="#category">Category</a></li>
<li class="section"><a href="#copyright">Copyright</a></li>
</ul>
</div>
<div id="synopsis" class="section"><h2><a name="synopsis">Synopsis</a></h2>
<div class="synopsis">
<ul class="requirements">
<li>package require <b class="pkgname">Tk 8.5</b></li>
<li>package require <b class="pkgname">Tcl 8.5</b></li>
<li>package require <b class="pkgname">img::png</b></li>
<li>package require <b class="pkgname">famfamfam <span class="opt">?1.1?</span></b></li>
<li>package require <b class="pkgname">famfamfam::subset 1</b></li>
</ul>
<ul class="syntax">
<li><a href="#1"><b class="cmd">::famfamfam::subset</b> <b class="method">new</b> <i class="arg">name</i> <i class="arg">version</i> <i class="arg">path</i></a></li>
<li><a href="#2"><b class="cmd">::famfamfam::subset</b> <b class="method">save</b> <i class="arg">iconset</i> <i class="arg">name</i> <i class="arg">path</i></a></li>
<li><a href="#3"><b class="cmd">::famfamfam::subset</b> <b class="method">done</b></a></li>
</ul>
</div>
</div>
<div id="section1" class="section"><h2><a name="section1">Description</a></h2>
<p>Welcome to famfamfam, a set of packages providing access to the
same-named icon sets created by
<a href="mailto:mjames@gmail.com">Mark James</a>, at
<a href="http://www.famfamfam.com/lab/icons/">http://www.famfamfam.com/lab/icons/</a></p>
<p>This package is a helper to ease the creation of icon packages
which are a subset of one or more icon packages based on the
<b class="package"><a href="core.html">famfamfam</a></b> core.</p>
<p>It resides in the Icon Set level of the architecture
<img alt="arch_subset" src="../../image/arch_subset.png"></p>
</div>
<div id="section2" class="section"><h2><a name="section2">API</a></h2>
<dl class="definitions">
<dt><a name="1"><b class="cmd">::famfamfam::subset</b> <b class="method">new</b> <i class="arg">name</i> <i class="arg">version</i> <i class="arg">path</i></a></dt>
<dd><p>This method starts the generation of a new icon package, with the
given <i class="arg">name</i> and <i class="arg">version</i>.
The package is assembled in the directory <i class="arg">path</i>.
The directory will be created if necessary.</p>
<p>The result of the method is the empty string.</p>
<p>An error will be thrown if a package is already in assembly.</p>
<p>After this method has been issued the methods <b class="method">save</b> and
<b class="method">done</b> can be used to add icons to the new package, and to
complete the assembly.</p>
<p>As a side-effect the <b class="package"><a href="core.html">famfamfam</a></b> core is configured
with an callback which will automatically <b class="method">save</b> all icons
which are loaded by famfamfam core based packages.</p></dd>
<dt><a name="2"><b class="cmd">::famfamfam::subset</b> <b class="method">save</b> <i class="arg">iconset</i> <i class="arg">name</i> <i class="arg">path</i></a></dt>
<dd><p>This method adds the specified icon to the icon package started with
method <b class="method">new</b>.</p>
<p>The result of the method is the empty string.</p>
<p>An error will be thrown if no package is in assembly.</p></dd>
<dt><a name="3"><b class="cmd">::famfamfam::subset</b> <b class="method">done</b></a></dt>
<dd><p>This method completes the generation of the icon package started with
method <b class="method">new</b>.</p>
<p>The result of the method is the empty string.</p>
<p>An error will be thrown if no package is in assembly.</p>
<p>The auto-<b class="method">save</b> callback installed by <b class="method">new</b> is
removed.</p></dd>
</dl>
</div>
<div id="section3" class="section"><h2><a name="section3">Bugs, Ideas, Feedback</a></h2>
<p>This document, and the package it describes, will undoubtedly contain
bugs and other problems.
Please report such at the <a href="http://chiselapp.com/user/andreas_kupries/repository/famfamfam">FamFamFam Tcl Tracker</a>.
Please also report any ideas for enhancements you may have for either
package and/or documentation.</p>
</div>
<div id="keywords" class="section"><h2><a name="keywords">Keywords</a></h2>
<p><a href="../../index.html#key1">famfamfam</a>, <a href="../../index.html#key0">icons</a>, <a href="../../index.html#key2">images</a></p>
</div>
<div id="category" class="section"><h2><a name="category">Category</a></h2>
<p>Icon sets</p>
</div>
<div id="copyright" class="section"><h2><a name="copyright">Copyright</a></h2>
<p>Copyright &copy; 2012 Andreas Kupries &lt;andreas_kupries@users.sourceforge.net&gt;<br>
Copyright &copy; 2012 Documentation, Andreas Kupries</p>
</div>
</div></body></html>

Changes to embedded/www/doc/toc.html.

17
18
19
20
21
22
23




24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50




51
52
<td class="#tocright">FamFamFam - How To Get The Sources</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/intro.html">famfamfam_introduction</a></td>
<td class="#tocright">FamFamFam - Introduction to FamFamFam</td>
</tr>
<tr class="#toceven" >




<td class="#tocleft" ><a href="files/devguide.html">famfamfam_devguide</a></td>
<td class="#tocright">FamFamFam - The Developer's Guide</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/installer.html">famfamfam_install_guide</a></td>
<td class="#tocright">FamFamFam - The Installer's Guide</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="files/core.html">famfamfam</a></td>
<td class="#tocright">FamFamFam Core</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/flags.html">famfamfam::flags</a></td>
<td class="#tocright">FamFamFam Flags Icon Set</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="files/mini.html">famfamfam::mini</a></td>
<td class="#tocright">FamFamFam Mini Icon Set</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/mint.html">famfamfam::mint</a></td>
<td class="#tocright">FamFamFam Mint Icon Set</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="files/silk.html">famfamfam::silk</a></td>
<td class="#tocright">FamFamFam Silk Icon Set</td>
</tr>




</table>
</dl><hr></body></html>







>
>
>
>



|



|



|



|



|



|



>
>
>
>


17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
<td class="#tocright">FamFamFam - How To Get The Sources</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/intro.html">famfamfam_introduction</a></td>
<td class="#tocright">FamFamFam - Introduction to FamFamFam</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="files/license.html">famfamfam_license</a></td>
<td class="#tocright">FamFamFam - License</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/devguide.html">famfamfam_devguide</a></td>
<td class="#tocright">FamFamFam - The Developer's Guide</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="files/installer.html">famfamfam_install_guide</a></td>
<td class="#tocright">FamFamFam - The Installer's Guide</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/core.html">famfamfam</a></td>
<td class="#tocright">FamFamFam Core</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="files/flags.html">famfamfam::flags</a></td>
<td class="#tocright">FamFamFam Flags Icon Set</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/mini.html">famfamfam::mini</a></td>
<td class="#tocright">FamFamFam Mini Icon Set</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="files/mint.html">famfamfam::mint</a></td>
<td class="#tocright">FamFamFam Mint Icon Set</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="files/silk.html">famfamfam::silk</a></td>
<td class="#tocright">FamFamFam Silk Icon Set</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="files/subset.html">famfamfam</a></td>
<td class="#tocright">FamFamFam Sub Setting</td>
</tr>
</table>
</dl><hr></body></html>

Changes to embedded/www/image/arch_core.png.

cannot compute difference between binary files

Changes to embedded/www/image/arch_flags.png.

cannot compute difference between binary files

Changes to embedded/www/image/arch_mini.png.

cannot compute difference between binary files

Changes to embedded/www/image/arch_mint.png.

cannot compute difference between binary files

Changes to embedded/www/image/arch_silk.png.

cannot compute difference between binary files

Added embedded/www/image/arch_subset.png.

cannot compute difference between binary files

Changes to embedded/www/image/architecture.png.

cannot compute difference between binary files

Changes to embedded/www/image/pkg_dependencies.png.

cannot compute difference between binary files

Changes to embedded/www/index.html.

17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
..
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
<hr><table class="#idx" width="100%">
<tr class="#idxheader"><th colspan="2">
<a name="c1">Keywords: F</a>
</th></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key1"> famfamfam </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/core.html"> famfamfam </a> &#183; <a href="doc/files/devguide.html"> famfamfam_devguide </a> &#183; <a href="doc/files/flags.html"> famfamfam::flags </a> &#183; <a href="doc/files/installer.html"> famfamfam_install_guide </a> &#183; <a href="doc/files/intro.html"> famfamfam_introduction </a> &#183; <a href="doc/files/mini.html"> famfamfam::mini </a> &#183; <a href="doc/files/mint.html"> famfamfam::mint </a> &#183; <a href="doc/files/silk.html"> famfamfam::silk </a> &#183; <a href="doc/files/sources.html"> famfamfam_sources </a>
</td></tr>
<tr class="#idxodd" valign=top>
<td class="#idxleft" width="35%"><a name="key7"> flags icons </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/flags.html"> famfamfam::flags </a>
</td></tr>
<tr class="#idxheader"><th colspan="2">
<a name="c2">Keywords: I</a>
</th></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key8"> icon set flags </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/flags.html"> famfamfam::flags </a>
</td></tr>
<tr class="#idxodd" valign=top>
<td class="#idxleft" width="35%"><a name="key10"> icon set mini </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/mini.html"> famfamfam::mini </a>
</td></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key6"> icon set mint </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/mint.html"> famfamfam::mint </a>
................................................................................
<td class="#idxleft" width="35%"><a name="key3"> icon set silk </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/silk.html"> famfamfam::silk </a>
</td></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key0"> icons </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/core.html"> famfamfam </a> &#183; <a href="doc/files/devguide.html"> famfamfam_devguide </a> &#183; <a href="doc/files/flags.html"> famfamfam::flags </a> &#183; <a href="doc/files/installer.html"> famfamfam_install_guide </a> &#183; <a href="doc/files/intro.html"> famfamfam_introduction </a> &#183; <a href="doc/files/mini.html"> famfamfam::mini </a> &#183; <a href="doc/files/mint.html"> famfamfam::mint </a> &#183; <a href="doc/files/silk.html"> famfamfam::silk </a> &#183; <a href="doc/files/sources.html"> famfamfam_sources </a>
</td></tr>
<tr class="#idxodd" valign=top>
<td class="#idxleft" width="35%"><a name="key2"> images </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/core.html"> famfamfam </a> &#183; <a href="doc/files/devguide.html"> famfamfam_devguide </a> &#183; <a href="doc/files/flags.html"> famfamfam::flags </a> &#183; <a href="doc/files/installer.html"> famfamfam_install_guide </a> &#183; <a href="doc/files/intro.html"> famfamfam_introduction </a> &#183; <a href="doc/files/mini.html"> famfamfam::mini </a> &#183; <a href="doc/files/mint.html"> famfamfam::mint </a> &#183; <a href="doc/files/silk.html"> famfamfam::silk </a> &#183; <a href="doc/files/sources.html"> famfamfam_sources </a>
</td></tr>
<tr class="#idxheader"><th colspan="2">
<a name="c3">Keywords: M</a>
</th></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key9"> mini icons </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/mini.html"> famfamfam::mini </a>
</td></tr>
<tr class="#idxodd" valign=top>
<td class="#idxleft" width="35%"><a name="key5"> mint icons </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/mint.html"> famfamfam::mint </a>







|


|







|




|







 







|




|





|







17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
..
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
<hr><table class="#idx" width="100%">
<tr class="#idxheader"><th colspan="2">
<a name="c1">Keywords: F</a>
</th></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key1"> famfamfam </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/core.html"> famfamfam </a> &#183; <a href="doc/files/devguide.html"> famfamfam_devguide </a> &#183; <a href="doc/files/flags.html"> famfamfam::flags </a> &#183; <a href="doc/files/installer.html"> famfamfam_install_guide </a> &#183; <a href="doc/files/intro.html"> famfamfam_introduction </a> &#183; <a href="doc/files/license.html"> famfamfam_license </a> &#183; <a href="doc/files/mini.html"> famfamfam::mini </a> &#183; <a href="doc/files/mint.html"> famfamfam::mint </a> &#183; <a href="doc/files/silk.html"> famfamfam::silk </a> &#183; <a href="doc/files/sources.html"> famfamfam_sources </a> &#183; <a href="doc/files/subset.html"> famfamfam </a>
</td></tr>
<tr class="#idxodd" valign=top>
<td class="#idxleft" width="35%"><a name="key9"> flags icons </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/flags.html"> famfamfam::flags </a>
</td></tr>
<tr class="#idxheader"><th colspan="2">
<a name="c2">Keywords: I</a>
</th></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key10"> icon set flags </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/flags.html"> famfamfam::flags </a>
</td></tr>
<tr class="#idxodd" valign=top>
<td class="#idxleft" width="35%"><a name="key8"> icon set mini </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/mini.html"> famfamfam::mini </a>
</td></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key6"> icon set mint </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/mint.html"> famfamfam::mint </a>
................................................................................
<td class="#idxleft" width="35%"><a name="key3"> icon set silk </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/silk.html"> famfamfam::silk </a>
</td></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key0"> icons </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/core.html"> famfamfam </a> &#183; <a href="doc/files/devguide.html"> famfamfam_devguide </a> &#183; <a href="doc/files/flags.html"> famfamfam::flags </a> &#183; <a href="doc/files/installer.html"> famfamfam_install_guide </a> &#183; <a href="doc/files/intro.html"> famfamfam_introduction </a> &#183; <a href="doc/files/license.html"> famfamfam_license </a> &#183; <a href="doc/files/mini.html"> famfamfam::mini </a> &#183; <a href="doc/files/mint.html"> famfamfam::mint </a> &#183; <a href="doc/files/silk.html"> famfamfam::silk </a> &#183; <a href="doc/files/sources.html"> famfamfam_sources </a> &#183; <a href="doc/files/subset.html"> famfamfam </a>
</td></tr>
<tr class="#idxodd" valign=top>
<td class="#idxleft" width="35%"><a name="key2"> images </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/core.html"> famfamfam </a> &#183; <a href="doc/files/devguide.html"> famfamfam_devguide </a> &#183; <a href="doc/files/flags.html"> famfamfam::flags </a> &#183; <a href="doc/files/installer.html"> famfamfam_install_guide </a> &#183; <a href="doc/files/intro.html"> famfamfam_introduction </a> &#183; <a href="doc/files/license.html"> famfamfam_license </a> &#183; <a href="doc/files/mini.html"> famfamfam::mini </a> &#183; <a href="doc/files/mint.html"> famfamfam::mint </a> &#183; <a href="doc/files/silk.html"> famfamfam::silk </a> &#183; <a href="doc/files/sources.html"> famfamfam_sources </a> &#183; <a href="doc/files/subset.html"> famfamfam </a>
</td></tr>
<tr class="#idxheader"><th colspan="2">
<a name="c3">Keywords: M</a>
</th></tr>
<tr class="#idxeven" valign=top>
<td class="#idxleft" width="35%"><a name="key7"> mini icons </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/mini.html"> famfamfam::mini </a>
</td></tr>
<tr class="#idxodd" valign=top>
<td class="#idxleft" width="35%"><a name="key5"> mint icons </a></td>
<td class="#idxright" width="65%">
<a href="doc/files/mint.html"> famfamfam::mint </a>

Changes to embedded/www/toc.html.

17
18
19
20
21
22
23




24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50




51
52
<td class="#tocright">FamFamFam - How To Get The Sources</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/intro.html">famfamfam_introduction</a></td>
<td class="#tocright">FamFamFam - Introduction to FamFamFam</td>
</tr>
<tr class="#toceven" >




<td class="#tocleft" ><a href="doc/files/devguide.html">famfamfam_devguide</a></td>
<td class="#tocright">FamFamFam - The Developer's Guide</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/installer.html">famfamfam_install_guide</a></td>
<td class="#tocright">FamFamFam - The Installer's Guide</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="doc/files/core.html">famfamfam</a></td>
<td class="#tocright">FamFamFam Core</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/flags.html">famfamfam::flags</a></td>
<td class="#tocright">FamFamFam Flags Icon Set</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="doc/files/mini.html">famfamfam::mini</a></td>
<td class="#tocright">FamFamFam Mini Icon Set</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/mint.html">famfamfam::mint</a></td>
<td class="#tocright">FamFamFam Mint Icon Set</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="doc/files/silk.html">famfamfam::silk</a></td>
<td class="#tocright">FamFamFam Silk Icon Set</td>
</tr>




</table>
</dl><hr></body></html>







>
>
>
>



|



|



|



|



|



|



>
>
>
>


17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
<td class="#tocright">FamFamFam - How To Get The Sources</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/intro.html">famfamfam_introduction</a></td>
<td class="#tocright">FamFamFam - Introduction to FamFamFam</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="doc/files/license.html">famfamfam_license</a></td>
<td class="#tocright">FamFamFam - License</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/devguide.html">famfamfam_devguide</a></td>
<td class="#tocright">FamFamFam - The Developer's Guide</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="doc/files/installer.html">famfamfam_install_guide</a></td>
<td class="#tocright">FamFamFam - The Installer's Guide</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/core.html">famfamfam</a></td>
<td class="#tocright">FamFamFam Core</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="doc/files/flags.html">famfamfam::flags</a></td>
<td class="#tocright">FamFamFam Flags Icon Set</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/mini.html">famfamfam::mini</a></td>
<td class="#tocright">FamFamFam Mini Icon Set</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="doc/files/mint.html">famfamfam::mint</a></td>
<td class="#tocright">FamFamFam Mint Icon Set</td>
</tr>
<tr class="#tocodd"  >
<td class="#tocleft" ><a href="doc/files/silk.html">famfamfam::silk</a></td>
<td class="#tocright">FamFamFam Silk Icon Set</td>
</tr>
<tr class="#toceven" >
<td class="#tocleft" ><a href="doc/files/subset.html">famfamfam</a></td>
<td class="#tocright">FamFamFam Sub Setting</td>
</tr>
</table>
</dl><hr></body></html>

Changes to flags.tcl.

1
2
3
4



5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
# -*- tcl -*-
# A Tcl packaging of the FamFamFam Icon set 'Flags'.
# Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>




# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam

# # ## ### ##### ######## ############# #####################
## Initialization

::apply {{selfdir} {
    ::famfamfam::Declare flags $selfdir/flags/icons
}} [file dirname [file normalize [info script]]]

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::flags 1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:




>
>
>



|





|





|







1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
# -*- tcl -*-
# A Tcl packaging of the FamFamFam Icon set 'Flags'.
# Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>

# @mdgen OWNER: flags/*
# @mdgen OWNER: flags/icons/*

# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam 1.1

# # ## ### ##### ######## ############# #####################
## Initialization

::apply {{selfdir} {
    ::famfamfam declare flags $selfdir/flags/icons
}} [file dirname [file normalize [info script]]]

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::flags 1.0.1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:

flags/readme.txt became a regular file.

Added icon_selector.

























































































































































































































































































































































































































































































































































































































































































































































































































































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
#!/usr/bin/env tclsh
# -*- tcl -*-
# # ## ### ##### ######## ############# #####################
# - debugging - local icon package files

lappend auto_path [file dirname [file normalize [info script]]]

package require Tcl 8.5
package require widget::scrolledwindow
package require widget::toolbar
package require widget::dialog
package require widget::validator ; # Tklib CVS!
package require tooltip
package require famfamfam
package require famfamfam::silk
package require famfamfam::subset

# # ## ### ##### ######## ############# #####################

proc main {} {
    cmdline
    gui
    after 0 setup

    # preload silk
    # make loading of mint, mini, flags easy.

    vwait /forever
    return
}

proc cmdline {} {
    global argv
    # syntax: -
    if {[llength $argv]} usage
    return
}

proc usage {} {
    global argv0
    puts stderr "Usage: $argv0"
    exit 1
}

# # ## ### ##### ######## ############# #####################

proc gui {} {
    # entry field for package names => icon sets.
    # load in safe interp - pluginmgr ?
    # list of icons, with icon set, name
    # - sortable by set, name
    # selection can be added to 2nd list
    # entry fields for package name, version, destination path.
    # swap list layout. (left - all, right - selection)

    widgets
    layout
    bindings
    return
}

proc widgets {} {
    widget::toolbar        .t
    widget::scrolledwindow .a
    widget::scrolledwindow .s

    ttk::treeview .all
    ttk::treeview .sel

    .all heading \#0 -text Icon   -image [i image]
    .sel heading \#0 -text Chosen -image [i image]

    .t add button a -image [i add]
    .t add button r -image [i delete]
    .t add button g -image [i brick_go]
    .t add space _
    .t add button e -image [i asterisk_orange] \
	-separator 1

    ttk::button .ai -image [i add]
    ttk::button .ri -image [i delete]
    return
}

proc i {name} { famfamfam::silk get $name }

proc layout {} {
    .a setwidget .all
    .s setwidget .sel

    g .t   0 0 1 4
    g .a   1 0 2 1
    g .ai  1 1 1 1
    g .s   1 2 2 1
    g .ri  1 3 1 1

    gc . row 0 0
    gc . row 1 0
    gc . row 2 1

    gc . column 0 1
    gc . column 1 0
    gc . column 2 1
    gc . column 3 0

    return
}

proc g {w r c rs cs {s swen}} {
    # padding?
    grid $w -row $r -column $c -rowspan $rs -columnspan $cs -sticky $s
    return
}

proc gc {f t i w} {
    grid ${t}configure $f $i -weight $w
    return
}

proc bindings {} {
    tooltip::tooltip [.t itemid a] {Add icon set}
    tooltip::tooltip [.t itemid r] {Drop icons}
    tooltip::tooltip [.t itemid g] {Generate icon package}
    tooltip::tooltip [.t itemid e] Exit

    tooltip::tooltip .ai {Add icons to chosen set}
    tooltip::tooltip .ri {Drop icons from chosen set}

    .t itemconfigure a -command a/add_set
    .t itemconfigure r -command a/drop
    .t itemconfigure g -command a/gen_package
    .t itemconfigure e -command ::exit

    .ai configure -command a/add_icons
    .ri configure -command a/drop_icons

    bind .all <<TreeviewSelect>> a/all_reselect
    bind .sel <<TreeviewSelect>> a/sel_reselect
    return
}

# # ## ### ##### ######## ############# #####################

proc setup {} {
    global selected

    set selected 0
    trace add variable ::selected write a/genable

    foreach is [famfamfam names] {
	add_set $is
    }

    # Forced some bindings to initialize button state
    a/all_reselect
    a/sel_reselect
    a/genable
    return
}

proc add_set {is} {
    # Main item for the icon set.
    .all insert {} end -id [list $is] -text $is

    # And the icons underneath it.
    foreach i [lsort -dict [famfamfam list $is]] {
	.all insert $is end -id [list $is $i] -text $i -image [famfamfam get $is $i]
    }
    return
}

# # ## ### ##### ######## ############# #####################
## data structures required ...
#
# Tree item ids are lists of one or two elements.
# 1-element list => icon set, element is set name
# 2-element list => icon, elements are set and icon name.
#
# This provides us with a natural mapping from icon set and icons to
# tree items and vice versa.

proc a/all_reselect {} {
    set n [llength [.all selection]]
    if {$n} {
	.ai configure -state normal
	[.t itemid r] configure -state normal
    } else {
	.ai configure -state disabled
	[.t itemid r] configure -state disabled
    }
    return
}

proc a/sel_reselect {} {
    set n [llength [.sel selection]]
    if {$n} {
	.ri configure -state normal
    } else {
	.ri configure -state disabled
    }
    return
}

proc a/genable {args} {
    global selected
    if {$selected} {
	[.t itemid g] configure -state normal
    } else {
	[.t itemid g] configure -state disabled
    }
    return
}

proc a/add_set {} {
    widget::dialog .d \
	-title {Icon Set Selection} \
	-synchronous 0 \
	-command a/add_set/go \
	-type okcancel

    ttk::frame .d.f
    ttk::label .d.f.n -text Package:
    ttk::entry .d.f.name

    widget::validator attach .d.f.name yellow {apply {{text} {
	set valid [expr {$text ne {}}]
	.d._buttonbox.ok configure -state [expr {$valid ? "normal":"disabled"}]
	return $valid
    }}}

    .d setwidget .d.f

    g .d.f.n    0 0 1 1
    g .d.f.name 0 1 1 1

    gc .d.f row 0 0

    gc .d.f column 0 0
    gc .d.f column 1 1

    .d display
    focus .d.f.name
    return
}

proc a/add_set/go {w button} {
    after idle {
	widget::validator detach .d.f.name
	destroy .d
    }

    if {$button ne "ok"} return
    .d.f.name instate invalid return

    set data [.d.f.name get]

    # Try to load package as is, or consider that it might a
    # short-hand for a famfamfam package.

    # ATTENTION: The package is trusted.
    # BEWARE:    No safe interpreter here.
    if {![catch {
	package require {*}$data
    } msga] || ![catch {
	package require {*}famfamfam::$data
    } msgb]} {
	# Package could be loaded.

	# Now check if this extended the set of known icon sets.
	# We simply try to add the set, if it is in the tree, it
	# will be immediately rejected due to the root item
	# existing.

	# This handles the possibility of having deleted the icon
	# set from the tree. It will still be known to the fff
	# core and would be ignored. This way it gets re-added.

	foreach n [famfamfam names] {
	    catch {
		add_set $n
	    }
	}
    } else {
	after idle [list \
			tk_messageBox \
			-title {Not Found} \
			-icon error \
			-message "$msga\n$msgb" \
		       ]
    }

    return
}

proc a/drop {} {
    # disabled if no selection available.
    .all delete [.all selection]
    return
}

proc a/add_icons {} {
    global selected
    # disabled if no selection available.

    foreach item [.all selection] {
	if {[itemtype $item is i] ne "icon"} continue

	# add parent, if not yet present.
	catch {
	    .sel insert {} end -id [list $is] -text $is
	} ;#msg ; puts %%$msg

	# add icon, ignore if already present.
	if {![catch {
	    .sel insert $is end -id $item -text $i -image [famfamfam get $is $i]
	} msg]} {
	    incr selected
	} else { puts %$msg }
    }
    return
}

proc a/drop_icons {} {
    # disabled if no selection available.
    global selected
    foreach item [.sel selection] {
	if {[itemtype $item _ _] eq "icon"} {
	    incr selected -1
	}
	.sel delete [list $item]
    }
    return
}

proc a/gen_package {} {

    widget::dialog .d \
	-title {Icon Set Generation} \
	-synchronous 0 \
	-command a/gen/go \
	-type okcancel

    ttk::frame .d.f

    ttk::label .d.f.n -text Name:
    ttk::label .d.f.v -text Version:
    ttk::label .d.f.p -text Path:

    ttk::entry .d.f.name
    ttk::entry .d.f.version
    ttk::entry .d.f.path

    .d setwidget .d.f

    g .d.f.n       0 0 1 1 e
    g .d.f.v       1 0 1 1 e
    g .d.f.p       2 0 1 1 e
    g .d.f.name    0 1 1 1
    g .d.f.version 1 1 1 1
    g .d.f.path    2 1 1 1

    gc .d.f row 0 0
    gc .d.f row 1 0
    gc .d.f row 2 0

    gc .d.f column 0 0
    gc .d.f column 1 1

    widget::validator attach .d.f.name yellow {apply {{text} {
	set valid [expr {$text ne {}}]
	after idle a/valid/gen
	return $valid
    }}}

    widget::validator attach .d.f.version yellow {apply {{text} {
	set valid [expr {($text ne {}) && ![catch {
	    package vcompare $text 0
	}]}]
	after idle a/valid/gen
	return $valid
    }}}

    widget::validator attach .d.f.path yellow {apply {{text} {
	set valid [expr {($text ne {}) && ![file exists $text]}]
	after idle a/valid/gen
	return $valid
    }}}

    .d display
    focus .d.f.name
    return
}

proc a/valid/gen {} {
    .d._buttonbox.ok configure -state normal
    .d.f.name    instate invalid {.d._buttonbox.ok configure -state disabled}
    .d.f.version instate invalid {.d._buttonbox.ok configure -state disabled}
    .d.f.path    instate invalid {.d._buttonbox.ok configure -state disabled}
    return
}

proc a/gen/go {w button} {
    after idle {
	widget::validator detach .d.f.name
	widget::validator detach .d.f.version
	widget::validator detach .d.f.path
	destroy .d
    }

    if {$button ne "ok"} return
    .d.f.name    instate invalid return
    .d.f.version instate invalid return
    .d.f.path    instate invalid return

    set n [.d.f.name    get]
    set v [.d.f.version get]
    set p [.d.f.path    get]

    famfamfam::subset new $n $v $p
    # iterate over tree contents.

    foreach is [.sel children {}] {
	foreach item [.sel children $is] {
	    lassign $item is i
	    famfamfam::subset save $is i [famfamfam path $is $i]
	}
    }
    famfamfam::subset done

    after 1 [list tk_messageBox \
	-title {Generation Done} \
	-icon info \
	-message "Generated package $n $v at $p"]
    return
}

# # ## ### ##### ######## ############# #####################

proc itemtype {item va vb} {
    upvar 1 $va vara $vb varb
    switch -exact -- [llength $item] {
	1 {
	    lassign $item vara
	    return set
	}
	2 {
	    lassign $item vara varb
	    return icon
	}
	default {
	    error "Bad item \"$item\""
	}
    }
}

# # ## ### ##### ######## ############# #####################
if {[catch {
    main
}]} { puts $::errorInfo }
exit 0

Changes to mini.tcl.

1
2
3
4



5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
# -*- tcl -*-
# A Tcl packaging of the FamFamFam Icon set 'Mini'.
# Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>




# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam

# # ## ### ##### ######## ############# #####################
## Initialization

::apply {{selfdir} {
    ::famfamfam::Declare mini $selfdir/mini/icons *.gif
}} [file dirname [file normalize [info script]]]

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::mini 1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:




>
>
>



|





|





|







1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
# -*- tcl -*-
# A Tcl packaging of the FamFamFam Icon set 'Mini'.
# Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>

# @mdgen OWNER: mini/*
# @mdgen OWNER: mini/icons/*

# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam 1.1

# # ## ### ##### ######## ############# #####################
## Initialization

::apply {{selfdir} {
    ::famfamfam declare mini $selfdir/mini/icons *.gif
}} [file dirname [file normalize [info script]]]

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::mini 1.0.1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:

Changes to mint.tcl.

1
2
3
4



5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
# -*- tcl -*-
# A Tcl packaging of the FamFamFam Icon set 'Mint'.
# Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>




# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam

# # ## ### ##### ######## ############# #####################
## Initialization

::apply {{selfdir} {
    ::famfamfam::Declare mint $selfdir/mint/icons
}} [file dirname [file normalize [info script]]]

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::mint 1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:




>
>
>



|





|





|







1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
# -*- tcl -*-
# A Tcl packaging of the FamFamFam Icon set 'Mint'.
# Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>

# @mdgen OWNER: mint/*
# @mdgen OWNER: mint/icons/*

# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam 1.1

# # ## ### ##### ######## ############# #####################
## Initialization

::apply {{selfdir} {
    ::famfamfam declare mint $selfdir/mint/icons
}} [file dirname [file normalize [info script]]]

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::mint 1.0.1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:

Changes to pkgIndex.tcl.

1
2
3
4
5
6
7
8
9

if {![package vsatisfies [package provide Tcl] 8.5]} {
    # PRAGMA: returnok
    return
}
package ifneeded famfamfam        1 [list source [file join $dir core.tcl]]
package ifneeded famfamfam::flags 1 [list source [file join $dir flags.tcl]]
package ifneeded famfamfam::mini  1 [list source [file join $dir mini.tcl]]
package ifneeded famfamfam::mint  1 [list source [file join $dir mint.tcl]]
package ifneeded famfamfam::silk  1 [list source [file join $dir silk.tcl]]





|
|
|
|
|
>
1
2
3
4
5
6
7
8
9
10
if {![package vsatisfies [package provide Tcl] 8.5]} {
    # PRAGMA: returnok
    return
}
package ifneeded famfamfam        1.1   [list source [file join $dir core.tcl]]
package ifneeded famfamfam::flags 1.0.1 [list source [file join $dir flags.tcl]]
package ifneeded famfamfam::mini  1.0.1 [list source [file join $dir mini.tcl]]
package ifneeded famfamfam::mint  1.0.1 [list source [file join $dir mint.tcl]]
package ifneeded famfamfam::silk  1.0.1 [list source [file join $dir silk.tcl]]
package ifneeded famfamfam::subset 1     [list source [file join $dir subset.tcl]]

Changes to silk.tcl.

1
2
3
4



5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
# -*- tcl -*-
# A Tcl packaging of the FamFamFam Icon set 'Silk'.
# Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>




# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam

# # ## ### ##### ######## ############# #####################
## Initialization

::apply {{selfdir} {
    ::famfamfam::Declare silk $selfdir/silk/icons
}} [file dirname [file normalize [info script]]]

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::silk 1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:




>
>
>



|





|





|







1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
# -*- tcl -*-
# A Tcl packaging of the FamFamFam Icon set 'Silk'.
# Copyright (c) 2012 Andreas Kupries <andreas_kupries@users.sourceforge.net>

# @mdgen OWNER: silk/*
# @mdgen OWNER: silk/icons/*

# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam 1.1

# # ## ### ##### ######## ############# #####################
## Initialization

::apply {{selfdir} {
    ::famfamfam declare silk $selfdir/silk/icons
}} [file dirname [file normalize [info script]]]

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::silk 1.0.1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End:

Added subset.tcl.











































































































































































































































































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
# -*- tcl -*-

# A package to collect the images loaded by icon sets based on famfamfam::core
# as into a new package and to serve as stand-in for the icon sets the images
# were collected from.

# Inspired by the subset patch send to me by
#	W. T. Schueller <wtschueller@users.sourceforge.net>
# and fixing the issues I had with how said patch went about its work.

# @mdgen OWNER: subset/*
# @mdgen OWNER: subset/icons/*

# # ## ### ##### ######## ############# #####################
## Requisites

package require famfamfam 1.1

namespace eval ::famfamfam::subset {}

# # ## ### ##### ######## ############# #####################
## API - Start interception and saving.

proc ::famfamfam::subset::new {name version dst} {
    # Create a package NAME + VERSION with saved icons at the given
    # location.

    variable ptemplate
    variable template
    variable destination

    if {$destination ne {}} {
        return -code error "Assembly in progress, unable to start a second"
    }

    set destination $dst

    # Create the directory we will collect the images in.
    file mkdir $destination

    lappend map @@name@@    $name
    lappend map @@qname@@   [list $name]
    lappend map @@version@@ $version
    lappend map @@time@@    [clock format [clock seconds]]
    lappend map @@user@@    $::tcl_platform(user)

    # Generate a package index ...
    set    c [open $destination/pkgIndex.tcl w]
    puts  $c [string map $map $ptemplate]
    close $c

    # ... And the package code
    set    c [open $destination/loader.tcl w]
    puts  $c [string map $map $template]
    close $c

    # At last tell the core to report to us which images are loaded so
    # that we can record them into the package we are creating.
    famfamfam intercept ::famfamfam::subset::save
    return
}

proc ::famfamfam::subset::save {iconset iconname iconpath} {
    variable destination

    if {$destination eq {}} {
        return -code error "No assembly in progress."
    }

    # Record the image into the package we are assembling.

    file mkdir $destination/icons/$iconset
    file copy $iconpath $destination/icons/$iconset/
    return
}

proc ::famfamfam::subset::done {} {
    # Stop recording.
    variable destination

    if {$destination eq {}} {
        return -code error "No assembly in progress"
    }

    set destination {}
    famfamfam intercept {}
    return
}

# # ## ### ##### ######## ############# #####################
## Export

namespace eval ::famfamfam::subset {
    # Directory a new package is assembled in.
    variable destination {}

    variable dedent    [list "\n        " "\n"]
    variable ptemplate [string map $dedent {
        package ifneeded @@qname@@ @@version@@ [list source [file join $dir loader.tcl]]
    }]

    variable template [string map $dedent {
        # -*- tcl -*- Generated package @@name@@
        #
        # Generated by package famfamfam::subset
        # at  @@time@@
        # for @@user@@
        #
        # @mdgen OWNER: *
        # @mdgen OWNER: icons/*

        # NOTE: The icons stored with this package are copied out of
        # the other famfamfam packages and are under their
        # copyright.
        #
        # This work is licensed under a
        # Creative Commons Attribution 2.5 License.
        # [ http://creativecommons.org/licenses/by/2.5/ ]
        #
        # This means you may use it for any purpose, and make any
        # changes you like.  All I ask is that you include a link back
        # to this page in your credits if possible.
        #
        # Are you using this icon set? Send me an email (a link or
        # picture if available) to mjames@gmail.com
        #
        # Any other questions about this icon set please contact
        # mjames@gmail.com
        #
        # See also http://www.famfamfam.com.

        # Requisites...
        package require Tcl 8.5 ; # apply
        package require famfamfam 1.1

        # Initialization...
        ::apply {{selfdir} {
            # We declare all the sub-directories we find as our icon sets
            foreach path [glob -nocomplain -types d -directory $selfdir/icons *] {
                set iconset [file tail $path]
                ::famfamfam declare $iconset $path *
            }
        }} [file dirname [file normalize [info script]]]

        # Ready...
        package  provide @@qname@@ @@version@@
        # Note: Keep the double spacing to hide the above command from build.tcl (version)
        return
    }]

    namespace export {[a-z]*}
    namespace ensemble create
}

# # ## ### ##### ######## ############# #####################
## Ready

package provide famfamfam::subset 1
return

# # ## ### ##### ######## ############# #####################
# Local variables:
# mode: tcl
# indent-tabs-mode: nil
# End: