Package: tkinfo
Version: 2.8-2
Severity: normal
Tags: patch
tkinfo is looking for app-defaults under /usr/lib/X11/app-defaults,
which are, under Debian, located under /etc/X11/app-defaults
The attached patch fixes this and removes the "lang" part of the path
since I have not ever seen it anywhere.
*t
-- System Information:
Debian Release: 4.0
APT prefers testing
APT policy: (500, 'testing')
Architecture: i386 (i686)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.18-3-686
Locale: LANG=C, LC_CTYPE=C (charmap=ANSI_X3.4-1968)
Versions of packages tkinfo depends on:
ii tk8.3 [wish] 8.3.5-6 Tk toolkit for Tcl and X11, v8.3 -
hi tk8.4 [wish] 8.4.12-1 Tk toolkit for Tcl and X11, v8.4 -
tkinfo recommends no packages.
-- no debconf information
--- /usr/bin/tkinfo.orig 2006-12-21 10:19:29.000000000 +0100
+++ /usr/bin/tkinfo 2007-02-24 22:55:12.000000000 +0100
@@ -113,7 +113,7 @@
The colors, fonts, and geometry of tkInfo can be customized using the
standard X options database. A random example follows. You can either put
(parts of) this in your .Xdefaults or .Xresources file or you can
-create a global file /usr/lib/X11/app-defaults/tkinfo that will apply
+create a global file /etc/X11/app-defaults/tkinfo that will apply
to all users of your site. To have the new options take effect,
restart your X server or use the program xrdb. More information about
the X options mechanism is available from the X man page. Use tkman
@@ -745,13 +745,17 @@
# Searches for the app-default files corresponding to classNames in
# the order specified by X Toolkit Intrinsics (R5), and loads them with
# the priority specified (default: startupFile). From the Tcl FAQ.
+#
+# Modified by Tomas Pospisek <[EMAIL PROTECTED]>:
+#
+# 1. use Debian specific system wide app-defaults path under /etc/X11
+# 2. remove "lang" - I haven't ever seen paths that contain a "lang" specific
part
+#
proc _tkiLoadAppDefaults {classNameList {priority startupFile}} {
- set lang [_tkiEnvVal LANG]
- if {[string length $lang] > 0} { set lang /$lang }
set filepath "\
- /usr/lib/X11${lang}/app-defaults \
+ /etc/X11/app-defaults \
[split [_tkiEnvVal XFILESEARCHPATH] :] \
- [_tkiEnvVal XAPPLRESDIR]${lang} \
+ [_tkiEnvVal XAPPLRESDIR]$ \
[split [_tkiEnvVal XUSERFILESEARCHPATH] :] \
"
foreach i $classNameList {
