[PD-cvs] packages/patches make_sizes_pixel_accurate_on_every_platform-0.40.3.patch, NONE, 1.1
Hans-Christoph Steiner
eighthave at users.sourceforge.net
Wed Jul 25 21:07:42 CEST 2007
Update of /cvsroot/pure-data/packages/patches
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv19420
Added Files:
make_sizes_pixel_accurate_on_every_platform-0.40.3.patch
Log Message:
font/gui patch now applies to 0.40.3 cleanly, now it's time to make sure it all works properly.
--- NEW FILE: make_sizes_pixel_accurate_on_every_platform-0.40.3.patch ---
Index: g_all_guis.h
===================================================================
RCS file: /cvsroot/pure-data/pd/src/g_all_guis.h,v
retrieving revision 1.5
retrieving revision 1.5.4.3
diff -u -w -r1.5 -r1.5.4.3
--- g_all_guis.h 16 Aug 2005 04:06:28 -0000 1.5
+++ g_all_guis.h 8 Jul 2007 21:56:30 -0000 1.5.4.3
@@ -144,7 +144,7 @@
int x_w;
int x_ldx;
int x_ldy;
- char x_font[16];
+ char x_font[MAXPDSTRING]; /* font names can be long! */
t_iem_fstyle_flags x_fsf;
int x_fontsize;
t_iem_init_symargs x_isa;
Index: g_all_guis.c
===================================================================
[...1697 lines suppressed...]
menu $name.popup -tearoff false
+ if {$pd_nt == 1} {
+ $name.popup configure -font menuFont
+ }
# puts stderr [concat $devlist ]
for {set x 0} {$x<[llength $devlist]} {incr x} {
$name.popup add command -label [lindex $devlist $x] \
@@ -3771,8 +3910,12 @@
# create a popup menu
proc midi_popup {name buttonname varname devlist} {
+ global pd_nt
if [winfo exists $name.popup] {destroy $name.popup}
menu $name.popup -tearoff false
+ if {$pd_nt == 1} {
+ $name.popup configure -font menuFont
+ }
# puts stderr [concat $devlist ]
for {set x 0} {$x<[llength $devlist]} {incr x} {
$name.popup add command -label [lindex $devlist $x] \
More information about the Pd-cvs
mailing list