forked from pool/tkfont
Reinhard Max
969debd372
- Fix command line syntax of sort (boo#1191366, tkfont-sort.patch). OBS-URL: https://build.opensuse.org/package/show/devel:openSUSE:Factory/tkfont?expand=0&rev=5
12 lines
476 B
Diff
12 lines
476 B
Diff
--- tkfont.orig
|
|
+++ tkfont
|
|
@@ -18,7 +18,7 @@ proc GetFontList { } {
|
|
set TempFileName "/tmp/fonts.list.[pid]"
|
|
set TempFileName2 "/tmp/fonts.list.[pid]b"
|
|
|
|
- exec xlsfonts -u -fn "*" | grep "-" | sort -t "-" +2 | uniq > $TempFileName
|
|
+ exec xlsfonts -u -fn "*" | grep "-" | sort -t "-" -k +2 | uniq > $TempFileName
|
|
exec grep -v "0-0-75-75-" < $TempFileName > $TempFileName2
|
|
exec grep -v "0-0-100-100-" < $TempFileName2 > $TempFileName
|
|
set Chan [open $TempFileName r]
|