# The "ticket" configuration exported from
# repository "bim.todo-0.fsl"
# on 2020-01-10 11:52:48
config /reportfmt 360
1578598295 'All Tickets' owner '' cols '#ffffff Key:
#f2dcdc Open
#c8c8c8 Closed' sqlcode 'SELECT
CASE WHEN status IN (''Open'') THEN ''#f2dcdc''
ELSE ''#c8c8c8'' END AS ''bgcolor'',
substr(tkt_uuid,1,10) AS ''#'',
status,
priority,
title,
project,
datetime(tkt_mtime) AS ''mtime'',
creator
FROM ticket
ORDER BY tkt_ctime'
config /reportfmt 389
1578656661 'Open tickets' owner 'admin' cols '#ffffff Key:
#f2dcdc Open
#c8c8c8 Closed' sqlcode 'SELECT
CASE WHEN status IN (''Open'') THEN ''#f2dcdc''
ELSE ''#c8c8c8'' END AS ''bgcolor'',
substr(tkt_uuid,1,10) AS ''#'',
status,
priority,
title,
project,
datetime(tkt_mtime) AS ''mtime'',
creator
FROM ticket
WHERE status=''Open''
ORDER BY tkt_ctime'
config /config 26
1332928292 'tcl' value '1'
config /config 719
1578564225 'ticket-table' value 'CREATE TABLE ticket(
-- Do not change any column that begins with tkt_
tkt_id INTEGER PRIMARY KEY,
tkt_uuid TEXT UNIQUE,
tkt_mtime DATE,
tkt_ctime DATE,
-- Add as many fields as required below this line
status TEXT,
priority TEXT,
project TEXT,
title TEXT,
creator TEXT,
comment TEXT
);
CREATE TABLE ticketchng(
-- Do not change any column that begins with tkt_
tkt_id INTEGER REFERENCES ticket,
tkt_rid INTEGER REFERENCES blob,
tkt_mtime DATE,
-- Add as many fields as required below this line
login TEXT,
username TEXT,
mimetype TEXT,
icomment TEXT
);
CREATE INDEX ticketchng_idx1 ON ticketchng(tkt_id, tkt_mtime);
'
config /config 239
1578525757 'ticket-common' value 'set priority_choices {
-
A
B
C
D
E
F
}
set status_choices {
Open
Closed
}
set project_choices {
-
client-gui
client-gui-newproject
client-sync
server
}
'
config /config 2832
1578656749 'ticket-newpage' value '<th1>
if {![info exists mutype]} {set mutype {Markdown}}
set creator $login
if {[info exists submit]} {
set status Open
if {$mutype eq "HTML"} {
set mimetype "text/html"
} elseif {$mutype eq "Markdown"} {
set mimetype "text/x-fossil-markdown"
} elseif {$mutype eq "Wiki"} {
set mimetype "text/x-fossil-wiki"
} elseif {$mutype eq {[links only]}} {
set mimetype "text/x-fossil-plain"
} else {
set mimetype "text/plain"
}
submit_ticket
set preview 1
}
</th1>
<h1 style="text-align: center;">Enter A New Ticket</h1>
<table cellpadding="5">
<tr>
<td colspan="3">
Enter a one-line summary of the ticket:<br />
<input type="text" name="title" size="60" value="$<title>" />
</td>
</tr>
<tr><td class="tktDspLabel">Status:</td><td>
<th1>combobox status $status_choices 1</th1>
</td></tr>
<tr><td class="tktDspLabel">Priority:</td><td>
<th1>combobox priority $priority_choices 1</th1>
</td></tr>
<tr>
<td class="tktDspLabel">Project:</td><td>
<th1>combobox project $project_choices 1</th1>
</td>
<td>Creator: <strong>$<creator></strong></td>
</tr>
<tr>
<td colspan="3">
Enter a detailed description of the problem.
Format:
<th1>combobox mutype {Markdown Wiki HTML {Plain Text} {[links only]}} 1</th1>
<br />
<th1>set nline [linecount $comment 50 10]</th1>
<textarea name="icomment" cols="80" rows="$nline"
wrap="virtual" class="wikiedit">$<icomment></textarea><br />
</tr>
<th1>enable_output [info exists preview]</th1>
<tr><td colspan="3">
Description Preview:<br /><hr />
<th1>
if {$mutype eq "Wiki"} {
wiki $icomment
} elseif {$mutype eq "Markdown"} {
set md [string trimright $icomment]
set md [markdown $md]
set title [lindex $md 0]
set body [lindex $md 1]
html "<h2>"
html $title
html "</h2>"
html $body
} elseif {$mutype eq "Plain Text"} {
set r [randhex]
wiki "<verbatim-$r>[string trimright $icomment]\n</verbatim-$r>"
} elseif {$mutype eq {[links only]}} {
set r [randhex]
wiki "<verbatim-$r links>[string trimright $icomment]\n</verbatim-$r>"
} else {
wiki "<nowiki>$icomment\n</nowiki>"
}
</th1>
<hr /></td></tr>
<th1>enable_output 1</th1>
<tr>
<td><td align="left">
<input type="submit" name="preview" value="Preview" />
</td>
<td align="left">See how the description will appear after formatting.</td>
</tr>
<tr>
<td><td align="left">
<input type="submit" name="submit" value="Submit" />
</td>
<td align="left">After filling in the information above, press this
button to create the new ticket</td>
</tr>
<tr>
<td><td align="left">
<input type="submit" name="cancel" value="Cancel" />
</td>
<td>Abandon and forget this ticket</td>
</tr>
</table>
'
config /config 3053
1578564268 'ticket-viewpage' value '<table cellpadding="5">
<tr><td class="tktDspLabel">Ticket UUID:</td>
<th1>
if {[info exists tkt_uuid]} {
html "<td class=''tktDspValue'' colspan=''3''>"
copybtn hash-tk 0 $tkt_uuid 1
if {[hascap s]} {
html " ($tkt_id)"
}
html "</td></tr>\n"
} else {
if {[hascap s]} {
html "<td class=''tktDspValue'' colspan=''3''>Deleted "
html "(0)</td></tr>\n"
} else {
html "<td class=''tktDspValue'' colspan=''3''>Deleted</td></tr>\n"
}
}
</th1>
<tr><td class="tktDspLabel">Title:</td>
<td class="tktDspValue" colspan="3">
$<title>
</td></tr>
<tr><td class="tktDspLabel">Status:</td><td class="tktDspValue">
$<status>
<td class="tktDspLabel">Priority:</td><td class="tktDspValue">
$<priority>
</tr>
<tr><td class="tktDspLabel">Last Modified:</td><td class="tktDspValue">
<th1>
if {[info exists tkt_datetime]} {
html $tkt_datetime
}
</th1>
</td>
<td class="tktDspLabel">Creator:</td><td class="tktDspValue">
$<creator>
</tr>
<tr>
</td>
<td class="tktDspLabel">Project:</td><td class="tktDspValue">
$<project>
</td>
</tr>
<th1>
if {[info exists comment]} {
if {[string length $comment]>10} {
html {
<tr><td class="tktDspLabel">Description:</td></tr>
<tr><td colspan="5" class="tktDspValue">
}
if {[info exists plaintext]} {
set r [randhex]
wiki "<verbatim-$r links>\n$comment\n</verbatim-$r>"
} else {
wiki $comment
}
}
}
set seenRow 0
set alwaysPlaintext [info exists plaintext]
query {SELECT datetime(tkt_mtime) AS xdate, login AS xlogin,
mimetype as xmimetype, icomment AS xcomment,
username AS xusername
FROM ticketchng
WHERE tkt_id=$tkt_id AND length(icomment)>0} {
if {$seenRow} {
html "<hr />\n"
} else {
html "<tr><td class=''tktDspLabel''>User Comments:</td></tr>\n"
html "<tr><td colspan=''5'' class=''tktDspValue''>\n"
set seenRow 1
}
html "[htmlize $xlogin]"
if {$xlogin ne $xusername && [string length $xusername]>0} {
html " (claiming to be [htmlize $xusername])"
}
html " added on $xdate:\n"
if {$alwaysPlaintext || $xmimetype eq "text/plain"} {
set r [randhex]
if {$xmimetype ne "text/plain"} {html "([htmlize $xmimetype])\n"}
wiki "<verbatim-$r>[string trimright $xcomment]</verbatim-$r>\n"
} elseif {$xmimetype eq "text/x-fossil-wiki"} {
wiki "<p>\n[string trimright $xcomment]\n</p>\n"
} elseif {$xmimetype eq "text/x-fossil-markdown"} {
set md [string trimright $xcomment]
set md [markdown $md]
set title [lindex $md 0]
set body [lindex $md 1]
html "<h2>"
html $title
html "</h2>"
html $body
} elseif {$xmimetype eq "text/html"} {
wiki "<p><nowiki>\n[string trimright $xcomment]\n</nowiki>\n"
} else {
set r [randhex]
wiki "<verbatim-$r links>[string trimright $xcomment]</verbatim-$r>\n"
}
}
if {$seenRow} {html "</td></tr>\n"}
</th1>
</table>
'
config /config 2712
1578656807 'ticket-editpage' value '<th1>
if {![info exists mutype]} {set mutype {Markdown}}
if {![info exists icomment]} {set icomment {}}
if {![info exists username]} {set username $login}
if {[info exists submit]} {
if {$mutype eq "Markdown"} {
set mimetype "text/x-fossil-markdown"
} elseif {$mutype eq "Wiki"} {
set mimetype text/x-fossil-wiki
} elseif {$mutype eq "HTML"} {
set mimetype text/html
} elseif {$mutype eq {[links only]}} {
set mimetype text/x-fossil-plain
} else {
set mimetype text/plain
}
submit_ticket
set preview 1
}
</th1>
<table cellpadding="5">
<tr><td class="tktDspLabel">Title:</td><td>
<input type="text" name="title" value="$<title>" size="60" />
</td></tr>
<tr><td class="tktDspLabel">Status:</td><td>
<th1>combobox status $status_choices 1</th1>
</td></tr>
<tr><td class="tktDspLabel">Priority:</td><td>
<th1>combobox priority $priority_choices 1</th1>
</td></tr>
<tr><td class="tktDspLabel">Project:</td><td>
<th1>combobox project $project_choices 1</th1>
Creator: <strong>$<creator>
</td>
</tr>
<tr><td colspan="2">
Append Remark with format
<th1>combobox mutype {Markdown Wiki HTML {Plain Text} {[links only]}} 1</th1>
from
<input type="text" name="username" value="$<username>" size="30" />:<br />
<textarea name="icomment" cols="80" rows="15"
wrap="virtual" class="wikiedit">$<icomment></textarea>
</td></tr>
<th1>enable_output [info exists preview]</th1>
<tr><td colspan="2">
Description Preview:<br /><hr />
<th1>
if {$mutype eq "Markdown"} {
set md [string trimright $icomment]
set md [markdown $md]
set title [lindex $md 0]
set body [lindex $md 1]
html "<h2>"
html $title
html "</h2>"
html $body
} elseif {$mutype eq "Wiki"} {
wiki $icomment
} elseif {$mutype eq "Plain Text"} {
set r [randhex]
wiki "<verbatim-$r>\n[string trimright $icomment]\n</verbatim-$r>"
} elseif {$mutype eq {[links only]}} {
set r [randhex]
wiki "<verbatim-$r links>\n[string trimright $icomment]</verbatim-$r>"
} else {
wiki "<nowiki>\n[string trimright $icomment]\n</nowiki>"
}
</th1>
<hr />
</td></tr>
<th1>enable_output 1</th1>
<tr>
<td align="right">
<input type="submit" name="preview" value="Preview" />
</td>
<td align="left">See how the description will appear after formatting.</td>
</tr>
<tr>
<td align="right">
<input type="submit" name="submit" value="Submit" />
</td>
<td align="left">Apply the changes shown above</td>
</tr>
<tr>
<td align="right">
<input type="submit" name="cancel" value="Cancel" />
</td>
<td>Abandon this edit</td>
</tr>
</table>
'
config /config 319
1578564335 'ticket-report-template' value 'SELECT
CASE WHEN status IN (''Open'') THEN ''#f2dcdc''
ELSE ''#c8c8c8'' END AS ''bgcolor'',
substr(tkt_uuid,1,10) AS ''#'',
datetime(tkt_mtime) AS ''mtime'',
status,
priority,
title,
project,
creator,
comment AS ''_comments''
FROM ticket
'
config /config 85
1578525895 'ticket-key-template' value '#ffffff Key:
#f2dcdc Open
#c8c8c8 Closed
'