Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2019 Conference, Houston/TX, US, Nov 4-8
Send your abstracts to [email protected]
or submit via the online form by Sep 9.

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

Overview
Comment:Fix up/ext images in the template commands.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 049757141f61456ffb77fe15122b9fb876350a56
User & Date: aku 2016-11-21 00:24:33
Original Comment: Fix up/ext images i nthe templates.
Context
2016-11-21
00:50
Rework the internal image refs, fix missing demailly ref check-in: 5a904227c1 user: aku tags: trunk
00:24
Fix up/ext images in the template commands. check-in: 049757141f user: aku tags: trunk
00:08
Fix favicon. check-in: d4229c4cab user: aku tags: trunk
Changes

Changes to input/templates/img.tcl.

26
27
28
29
30
31
32
33
34
35
36
37
38
    global currentPageId
    set prefix "[get-page-data $currentPageId rootDirPath]/"
    lset args 0 "${prefix}images/[lindex $args 0]"
    imgx {*}$args
}

proc up {} {
    img-localx up.gif "Up"
}

proc ext {} {
    img-localx ext.gif "External Reference"
}






|



|

26
27
28
29
30
31
32
33
34
35
36
37
38
    global currentPageId
    set prefix "[get-page-data $currentPageId rootDirPath]/"
    lset args 0 "${prefix}images/[lindex $args 0]"
    imgx {*}$args
}

proc up {} {
    img-localx up.png "Up"
}

proc ext {} {
    img-localx ext.png "External Reference"
}