Fossil SCM
fix bug in /tktview: use relative instead of absolute link for version
Commit
f1db9ead1d44290a0cb029f02987418b348685e178d8e2f5b459dbda6532648b
Parent
00638d9a838324d…
1 file changed
+2
-2
+2
-2
| --- src/tktsetup.c | ||
| +++ src/tktsetup.c | ||
| @@ -555,18 +555,18 @@ | ||
| 555 | 555 | @ set urlfoundin [httpize $foundin] |
| 556 | 556 | @ set tagpattern {^[-0-9A-Za-z_\\.]+$} |
| 557 | 557 | @ if [regexp $tagpattern $foundin] { |
| 558 | 558 | @ query {SELECT count(*) AS match FROM tag |
| 559 | 559 | @ WHERE tagname=concat('sym-',$foundin)} { |
| 560 | -@ if {$match} {set versionlink "/timeline?t=$urlfoundin"} | |
| 560 | +@ if {$match} {set versionlink "timeline?t=$urlfoundin"} | |
| 561 | 561 | @ } |
| 562 | 562 | @ } |
| 563 | 563 | @ set hashpattern {^[0-9a-f]+$} |
| 564 | 564 | @ if [regexp $hashpattern $foundin] { |
| 565 | 565 | @ set pattern $foundin* |
| 566 | 566 | @ query {SELECT count(*) AS match FROM blob WHERE uuid GLOB $pattern} { |
| 567 | -@ if {$match} {set versionlink "/info/$urlfoundin"} | |
| 567 | +@ if {$match} {set versionlink "info/$urlfoundin"} | |
| 568 | 568 | @ } |
| 569 | 569 | @ } |
| 570 | 570 | @ if {$versionlink eq ""} { |
| 571 | 571 | @ puts $foundin |
| 572 | 572 | @ } else { |
| 573 | 573 |
| --- src/tktsetup.c | |
| +++ src/tktsetup.c | |
| @@ -555,18 +555,18 @@ | |
| 555 | @ set urlfoundin [httpize $foundin] |
| 556 | @ set tagpattern {^[-0-9A-Za-z_\\.]+$} |
| 557 | @ if [regexp $tagpattern $foundin] { |
| 558 | @ query {SELECT count(*) AS match FROM tag |
| 559 | @ WHERE tagname=concat('sym-',$foundin)} { |
| 560 | @ if {$match} {set versionlink "/timeline?t=$urlfoundin"} |
| 561 | @ } |
| 562 | @ } |
| 563 | @ set hashpattern {^[0-9a-f]+$} |
| 564 | @ if [regexp $hashpattern $foundin] { |
| 565 | @ set pattern $foundin* |
| 566 | @ query {SELECT count(*) AS match FROM blob WHERE uuid GLOB $pattern} { |
| 567 | @ if {$match} {set versionlink "/info/$urlfoundin"} |
| 568 | @ } |
| 569 | @ } |
| 570 | @ if {$versionlink eq ""} { |
| 571 | @ puts $foundin |
| 572 | @ } else { |
| 573 |
| --- src/tktsetup.c | |
| +++ src/tktsetup.c | |
| @@ -555,18 +555,18 @@ | |
| 555 | @ set urlfoundin [httpize $foundin] |
| 556 | @ set tagpattern {^[-0-9A-Za-z_\\.]+$} |
| 557 | @ if [regexp $tagpattern $foundin] { |
| 558 | @ query {SELECT count(*) AS match FROM tag |
| 559 | @ WHERE tagname=concat('sym-',$foundin)} { |
| 560 | @ if {$match} {set versionlink "timeline?t=$urlfoundin"} |
| 561 | @ } |
| 562 | @ } |
| 563 | @ set hashpattern {^[0-9a-f]+$} |
| 564 | @ if [regexp $hashpattern $foundin] { |
| 565 | @ set pattern $foundin* |
| 566 | @ query {SELECT count(*) AS match FROM blob WHERE uuid GLOB $pattern} { |
| 567 | @ if {$match} {set versionlink "info/$urlfoundin"} |
| 568 | @ } |
| 569 | @ } |
| 570 | @ if {$versionlink eq ""} { |
| 571 | @ puts $foundin |
| 572 | @ } else { |
| 573 |