Date: Wed, 21 Jun 2000 22:25:07 -0700 (PDT) From: <andy@geek4food.org> To: FreeBSD-gnats-submit@freebsd.org Subject: ports/19432: new TkMan/glimpse interaction problem. Message-ID: <200006220525.WAA99389@mega.geek4food.org>
next in thread | raw e-mail | index | archive | help
>Number: 19432
>Category: ports
>Synopsis: Syntax error with new TkMan 2.1b4 port?
>Confidential: no
>Severity: serious
>Priority: low
>Responsible: freebsd-ports
>State: open
>Quarter:
>Keywords:
>Date-Required:
>Class: change-request
>Submitter-Id: current-users
>Arrival-Date: Wed Jun 21 22:30:00 PDT 2000
>Closed-Date:
>Last-Modified:
>Originator: Andy Sparrow
>Release: FreeBSD 3.4-STABLE i386
>Organization:
Not Really
>Environment:
All currently supported ports environments, as far as I can tell.
>Description:
Looks like a typo or snytax erorr to me :-)
>How-To-Repeat:
Build TkMan 2.1b4.
Fix the glimpse problem which prevents TkMan from starting
(submitted under separate PR)
Click on 'Occasional' menu ('...' label)
Select 'Rebuild Database'
Select 'Versioning caches'
Observe the following stack trace:
missing close-bracket
while compiling
"expr {[$errmsg==""?"CACHEING":$errmsg}"
while compiling
"$t insert end "[expr {[$errmsg==""?"CACHEING":$errmsg}]\n""
("foreach" body line 23)
while compiling
"foreach dir $mani($sect,dirs) {
$t insert end $dir b " "
set rcsdir "$dir/RCS"
set cachedir $dir
if {[regsub {/man([^/]+)$} [file dirname $dir] {..."
("foreach" body line 2)
while compiling
"foreach sect $mani(manList) {
foreach dir $mani($sect,dirs) {
$t insert end $dir b " "
set rcsdir "$dir/RCS"
>Fix:
Adding this patch fragment to the other patches works for me, YMMV.
Disclaimer: IANATH
--- tkman.orig Fri Jun 16 20:36:34 2000
+++ tkman Wed Jun 21 21:52:10 2000
@@ -4384,7 +4384,7 @@
} elseif {![file writable $writedir]} {set errmsg "$cachedir not writable/creatable (need perissions on $writedir)"
}
-$t insert end "[expr {[$errmsg==""?"CACHEING":$errmsg}]\n"
+$t insert end "[expr {$errmsg==""?"CACHEING":$errmsg}]\n"
update idletasks; $t see end
if {![string equal $errmsg ""]} continue
>Release-Note:
>Audit-Trail:
>Unformatted:
To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-ports" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?200006220525.WAA99389>