Artifact
7ba96d15bda48170f20725734363c278a925b635:
Ticket change
[7ba96d15]
- New ticket
[46d7a4d1] tags not present as intended.
by
chw
2017-05-26 21:39:17.
D 2017-05-26T21:39:17.171
J assignee nobody
J closer nobody
J cmimetype text/plain
J comment The\scode\sbelow\sis\sderived\sfrom\sthe\swidget\sdemo\sand\sshould\sdisplay\shyperlinks\son\smost\slines.\r\nThere\sseems\sto\sbe\sa\spattern\sof\slines\snot\sgetting\sa\shyperlink\stag.\sTried\son\sa\sx86_64\slinux\sbuild.\r\n\r\n---\scode\s---\r\n\r\ntext\s.t\s-wrap\sword\s-width\s70\s-height\s50\s\\\r\n\s\s\s\s\s\s\s\s-setgrid\s1\s-highlightthickness\s0\r\npack\s.t\s-expand\s1\s-fill\sboth\s-padx\s1\r\n\r\n.t\stag\sconfigure\stitle\s-font\sTkDefaultFont\r\n.t\stag\sconfigure\ssubtitle\s-font\sTkDefaultFont\r\n.t\stag\sconfigure\sbold\s-font\sTkDefaultFont\r\n.t\stag\sconfigure\sdemospace\s-lmargin1\s1c\s-lmargin2\s1c\r\n.t\stag\sconfigure\sdemo\s-lmargin1\s1c\s-lmargin2\s1c\s\\\r\n\s\s\s\s-foreground\sblue\s-underline\s1\r\n.t\stag\sconfigure\svisited\s-lmargin1\s1c\s-lmargin2\s1c\s\\\r\n\s\s\s\s-foreground\s#303080\s-underline\s1\r\n.t\stag\sconfigure\shot\s-foreground\sred\s-underline\s1\r\n\r\nproc\saddt\s{text}\s{\r\n\s\s\s\sset\sstyle\snormal\r\n\s\s\s\sset\sisNL\s1\r\n\s\s\s\sset\sdemoCount\s0\r\n\s\s\s\sset\snew\s0\r\n\s\s\s\sforeach\sline\s[split\s$text\s\\n]\s{\r\n\s\s\s\s\s\s\s\sset\sline\s[string\strim\s$line]\r\n\s\s\s\s\s\s\s\sif\s{$line\seq\s""}\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\scontinue\r\n\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\sif\s{[string\smatch\s@@*\s$line]}\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\sset\sdata\s[string\srange\s$line\s2\send]\r\n\s\s\s\s\s\s\s\s\s\s\s\sset\skey\s[lindex\s$data\s0]\r\n\s\s\s\s\s\s\s\s\s\s\s\sset\svalues\s[lrange\s$data\s1\send]\r\n\s\s\s\s\s\s\s\s\s\s\s\sswitch\s-exact\s--\s$key\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\stitle\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s.t\sinsert\send\s$values\\n\stitle\s\\n\snormal\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\snewline\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s.t\sinsert\send\s\\n\s$style\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sset\sisNL\s1\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\ssubtitle\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s.t\sinsert\send\s"\\n"\s{}\s$values\ssubtitle\s\\\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s"\s\\n\s"\sdemospace\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sset\sdemoCount\s0\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sdemo\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sset\sdescription\s[lassign\s$values\sname]\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s.t\sinsert\send\s"[incr\sdemoCount].\s$description"\s\\\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s[list\sdemo\sdemo-$name]\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sif\s{$new}\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s.t\simage\screate\send\s-image\s::img::new\s-padx\s5\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sset\snew\s0\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s.t\sinsert\send\s"\s\\n\s"\sdemospace\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\snew\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sset\snew\s1\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sdefault\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sset\sstyle\s$key\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s\s\s\s\scontinue\r\n\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\sif\s{!$isNL}\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s.t\sinsert\send\s"\s"\s$style\r\n\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\sset\sisNL\s0\r\n\s\s\s\s\s\s\s\s.t\sinsert\send\s$line\s$style\r\n\s\s\s\s}\r\n}\r\n\r\nset\saddt\s{\r\n\s\s\s\s@@title\s\s\s\s\sTag\stest\r\n\r\n\s\s\s\sBla\sbla\sbla\s...\r\n\s\s\s\sBla\sbla\sbla\s...\r\n\r\n\s\s\s\s@@subtitle\s\s\ssubtitle\r\n}\r\n\r\nfor\s{set\si\s0}\s{$i\s<\s1024}\s{incr\si}\s{\r\n\s\s\s\sappend\saddt\s"\s\s\s\s@@demo\stag$i\\ttag$i\\n"\r\n}\r\n\r\naddt\s$addt\r\n\r\n---\s/code\s---
J foundin revised_text
J is_private 0
J login chw
J priority 5\sMedium
J private_contact 0b3aff16612e1e9f3b675963fa64e01bd1d89307
J resolution None
J severity Severe
J status Open
J submitter chw
J subsystem --\sNew\sWidgets
J title tags\snot\spresent\sas\sintended
J type Bug
K 46d7a4d153591683ad4283e3eed018f420c50617
U chw
Z 280b109f5ed3025e985d7c69d855ef23
