Fossil SCM

fossil-scm / skins / default / header.txt
Blame History Raw 68 lines
1
<header>
2
<div class="logo">
3
<th1>
4
## See skins/original/header.txt for commentary; not repeated here.
5
proc getLogoUrl { baseurl } {
6
set idx(first) [string first // $baseurl]
7
if {$idx(first) != -1} {
8
set idx(first+1) [expr {$idx(first) + 2}]
9
set idx(nextRange) [string range $baseurl $idx(first+1) end]
10
set idx(next) [string first / $idx(nextRange)]
11
if {$idx(next) != -1} {
12
set idx(next) [expr {$idx(next) + $idx(first+1)}]
13
set idx(next-1) [expr {$idx(next) - 1}]
14
set scheme [string range $baseurl 0 $idx(first)]
15
set host [string range $baseurl $idx(first+1) $idx(next-1)]
16
if {[string compare $scheme http:/] == 0} {
17
set scheme http://
18
} else {
19
set scheme https://
20
}
21
set logourl $scheme$host/
22
} else {
23
set logourl $baseurl
24
}
25
} else {
26
set logourl $baseurl
27
}
28
return $logourl
29
}
30
set logourl [getLogoUrl $baseurl]
31
</th1>
32
<a href="$logourl">
33
<img src="$logo_image_url" border="0" alt="$<project_name>">
34
</a>
35
</div>
36
<div class="title">
37
<h1>$<project_name></h1>
38
<span class="page-title">$<title></span>
39
</div>
40
<div class="status">
41
<th1>
42
if {[info exists login]} {
43
html "<a href='$home/login'>$login</a>\n"
44
} else {
45
html "<a href='$home/login'>Login</a>\n"
46
}
47
</th1>
48
</div>
49
</header>
50
<nav class="mainmenu" title="Main Menu">
51
<th1>
52
html "<a id='hbbtn' href='$home/sitemap' aria-label='Site Map'>&#9776;</a>"
53
builtin_request_js hbmenu.js
54
foreach {name url expr class} $mainmenu {
55
if {![capexpr $expr]} continue
56
if {[string match /* $url]} {
57
if {[string match $url\[/?#\]* /$current_page/]} {
58
set class "active $class"
59
}
60
set url $home$url
61
}
62
html "<a href='$url' class='$class'>$name</a>\n"
63
}
64
</th1>
65
</nav>
66
<nav id="hbdrop" class='hbdrop' title="sitemap"></nav>
67
<h1 class="page-title">$<title></h1>
68

Keyboard Shortcuts

Open search /
Next entry (timeline) j
Previous entry (timeline) k
Open focused entry Enter
Show this help ?
Toggle theme Top nav button