From 91e95ea6d8335dfb6b638a018cfbc4d29ac03f4d Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Tue, 17 Oct 2006 05:05:30 +0000 Subject: replaced all X11 fontspecs with Tk font specs on the road to making the fonts/graphics appear the same on all platforms svn path=/trunk/; revision=6123 --- packages/patches/console_font_normal-0.39.2.patch | 13 -- packages/patches/remove_x11_fontspecs_0.39.2.patch | 146 +++++++++++++++++++++ 2 files changed, 146 insertions(+), 13 deletions(-) delete mode 100644 packages/patches/console_font_normal-0.39.2.patch create mode 100644 packages/patches/remove_x11_fontspecs_0.39.2.patch (limited to 'packages/patches') diff --git a/packages/patches/console_font_normal-0.39.2.patch b/packages/patches/console_font_normal-0.39.2.patch deleted file mode 100644 index 2b7f8361..00000000 --- a/packages/patches/console_font_normal-0.39.2.patch +++ /dev/null @@ -1,13 +0,0 @@ ---- u_main.tk Thu Jun 9 11:54:59 2005 -+++ u_main.tk Thu Jun 9 16:17:58 2005 -@@ -172,8 +171,8 @@ - - - frame .printout --text .printout.text -relief raised -bd 2 -font -*-courier-bold--normal--12-* \ -- -yscrollcommand ".printout.scroll set" -width 80 -+text .printout.text -relief raised -bd 2 -font {courier 12 normal} \ -+ -yscrollcommand ".printout.scroll set" -width 60 - # .printout.text insert end "\n\n\n\n\n\n\n\n\n\n" - scrollbar .printout.scroll -command ".printout.text yview" - pack .printout.scroll -side right -fill y diff --git a/packages/patches/remove_x11_fontspecs_0.39.2.patch b/packages/patches/remove_x11_fontspecs_0.39.2.patch new file mode 100644 index 00000000..54e9ee49 --- /dev/null +++ b/packages/patches/remove_x11_fontspecs_0.39.2.patch @@ -0,0 +1,146 @@ +? conf28360.sh +? configure +Index: g_graph.c +=================================================================== +RCS file: /cvsroot/pure-data/pd/src/g_graph.c,v +retrieving revision 1.9 +diff -u -w -r1.9 g_graph.c +--- g_graph.c 15 Sep 2005 03:17:27 -0000 1.9 ++++ g_graph.c 17 Oct 2006 04:52:43 -0000 +@@ -739,7 +739,7 @@ + int ymin = (y1 < y2 ? y1 : y2); + t_symbol *s = garray_getname((t_garray *)g); + sys_vgui(".x%lx.c create text %d %d -text {%s} -anchor sw\ +- -font -*-courier-bold--normal--%d-* -tags %s\n", ++ -font {courier %d bold} -tags %s\n", + (long)glist_getcanvas(x), x1, ymin, s->s_name, + sys_hostfontsize(glist_getfont(x)), tag); + } +@@ -821,7 +821,7 @@ + /* draw x labels */ + for (i = 0; i < x->gl_nxlabels; i++) + sys_vgui(".x%lx.c create text\ +- %d %d -text {%s} -font -*-courier-bold--normal--%d-* -tags %s\n", ++ %d %d -text {%s} -font {courier %d bold} -tags %s\n", + glist_getcanvas(x), + (int)glist_xtopixels(x, atof(x->gl_xlabel[i]->s_name)), + (int)glist_ytopixels(x, x->gl_xlabely), x->gl_xlabel[i]->s_name, +@@ -830,7 +830,7 @@ + /* draw y labels */ + for (i = 0; i < x->gl_nylabels; i++) + sys_vgui(".x%lx.c create text\ +- %d %d -text {%s} -font -*-courier-bold--normal--%d-* -tags %s\n", ++ %d %d -text {%s} -font {courier %d bold} -tags %s\n", + glist_getcanvas(x), + (int)glist_xtopixels(x, x->gl_ylabelx), + (int)glist_ytopixels(x, atof(x->gl_ylabel[i]->s_name)), +Index: g_template.c +=================================================================== +RCS file: /cvsroot/pure-data/pd/src/g_template.c,v +retrieving revision 1.13 +diff -u -w -r1.13 g_template.c +--- g_template.c 21 Aug 2005 17:46:52 -0000 1.13 ++++ g_template.c 17 Oct 2006 04:52:43 -0000 +@@ -2090,7 +2090,7 @@ + drawnumber_sprintf(x, buf, &at); + sys_vgui(".x%lx.c create text %d %d -anchor nw -fill %s -text {%s}", + glist_getcanvas(glist), xloc, yloc, colorstring, buf); +- sys_vgui(" -font -*-courier-bold--normal--%d-*", ++ sys_vgui(" -font {courier %d bold}", + sys_hostfontsize(glist_getfont(glist))); + sys_vgui(" -tags drawnumber%lx\n", data); + } +Index: s_main.c +=================================================================== +RCS file: /cvsroot/pure-data/pd/src/s_main.c,v +retrieving revision 1.20 +diff -u -w -r1.20 s_main.c +--- s_main.c 2 Dec 2005 04:58:24 -0000 1.20 ++++ s_main.c 17 Oct 2006 04:52:43 -0000 +@@ -155,11 +155,7 @@ + } + + int sys_defaultfont; +-#ifdef MSW +-#define DEFAULTFONT 12 +-#else + #define DEFAULTFONT 10 +-#endif + + static void openit(const char *dirname, const char *filename) + { +Index: u_main.tk +=================================================================== +RCS file: /cvsroot/pure-data/pd/src/u_main.tk,v +retrieving revision 1.17 +diff -u -w -r1.17 u_main.tk +--- u_main.tk 15 Oct 2005 23:14:28 -0000 1.17 ++++ u_main.tk 17 Oct 2006 04:52:43 -0000 +@@ -171,7 +171,7 @@ + + + frame .printout +-text .printout.text -relief raised -bd 2 -font -*-courier-bold--normal--12-* \ ++text .printout.text -relief raised -bd 2 -font {courier 12 normal} \ + -yscrollcommand ".printout.scroll set" -width 80 + # .printout.text insert end "\n\n\n\n\n\n\n\n\n\n" + scrollbar .printout.scroll -command ".printout.text yview" +@@ -355,7 +355,7 @@ + # global pd_font3 + set name [format ".help%d" $doc_number] + toplevel $name +- text $name.text -relief raised -bd 2 -font -*-times-regular--normal--14-* \ ++ text $name.text -relief raised -bd 2 -font {times 14 normal} \ + -yscrollcommand "$name.scroll set" -background white + scrollbar $name.scroll -command "$name.text yview" + pack $name.scroll -side right -fill y +@@ -1252,7 +1252,7 @@ + set $windowName.lb [listbox $windowName.lb -height 20 -width 25\ + -selectmode extended \ + -relief solid -background white -borderwidth 1 \ +- -font [format -*-courier-bold--normal--%d-* \ ++ -font [format {courier %d bold} \ + $font] \ + -yscrollcommand "$windowName.lb.sb set"] + set $windowName.lb.sb [scrollbar $windowName.lb.sb \ +@@ -1371,7 +1371,7 @@ + set bbox [$lbName bbox $itemNum] + set y [expr [lindex $bbox 1] - 4] + set $lbName.entry [entry $lbName.entry \ +- -font [format -*-courier-bold--normal--%d-* $font]] ++ -font [format {courier %d bold} $font]] + $lbName.entry insert 0 [] + place configure $lbName.entry -relx 0 -y $y -relwidth 1 + lower $lbName.entry +@@ -3180,8 +3180,8 @@ + + ############ pdtk_text_new -- create a new text object #2########### + proc pdtk_text_new {canvasname myname x y text font color} { +-# if {$font < 13} {set fontname [format -*-courier-bold----%d-* $font]} +-# if {$font >= 13} {set fontname [format -*-courier-----%d-* $font]} ++# if {$font < 13} {set fontname [format {courier %d bold} $font]} ++# if {$font >= 13} {set fontname [format {courier %d normal} $font]} + + global pd_font1 pd_font2 pd_font3 pd_font4 pd_font5 pd_font6 pd_font7 + switch -- $font { +@@ -3235,13 +3235,13 @@ + set pd_midiapilist $midiapilist + global pd_font1 pd_font2 pd_font3 pd_font4 pd_font5 pd_font6 pd_font7 + +- set pd_font1 [format -*-%s-bold--normal--8-* $fontname] +- set pd_font2 [format -*-%s-bold--normal--10-* $fontname] +- set pd_font3 [format -*-%s-bold--normal--12-* $fontname] +- set pd_font4 [format -*-%s-bold--normal--14-* $fontname] +- set pd_font5 [format -*-%s-bold--normal--16-* $fontname] +- set pd_font6 [format -*-%s-bold--normal--24-* $fontname] +- set pd_font7 [format -*-%s-bold--normal--36-* $fontname] ++ set pd_font1 [format {%s 8 bold} $fontname] ++ set pd_font2 [format {%s 10 bold} $fontname] ++ set pd_font3 [format {%s 12 bold} $fontname] ++ set pd_font4 [format {%s 14 bold} $fontname] ++ set pd_font5 [format {%s 16 bold} $fontname] ++ set pd_font6 [format {%s 24 bold} $fontname] ++ set pd_font7 [format {%s 36 bold} $fontname] + + set width1 [font measure $pd_font1 x] + set height1 [lindex [font metrics $pd_font1] 5] -- cgit v1.2.1