Update of /cvsroot/pure-data/packages/patches In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv6167
Added Files: set_cursors_in_tcl-0.41-test06.patch Log Message: allow dynamic cursor configuration by move cursor name variables to u_main.tk, this is patch 1826507
--- NEW FILE: set_cursors_in_tcl-0.41-test06.patch --- Index: u_main.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/u_main.tk,v retrieving revision 1.28 diff -u -w -r1.28 u_main.tk --- u_main.tk 18 Aug 2007 23:32:44 -0000 1.28 +++ u_main.tk 6 Nov 2007 02:10:48 -0000 @@ -31,6 +31,36 @@ set pd_array_listview_page(0) 0 # end jsarlo
+# set up mouse cursors individually on each platform +switch -- $pd_nt { 0 { + # GNU/Linux + set cursor_runmode_nothing "left_ptr" + set cursor_runmode_clickme "arrow" + set cursor_runmode_thicken "sb_v_double_arrow" + set cursor_runmode_addpoint "plus" + set cursor_editmode_nothing "hand2" + set cursor_editmode_connect "circle" + set cursor_editmode_disconnect "X_cursor" +} 1 { + # Windows + set cursor_runmode_nothing "rigth_ptr" + set cursor_runmode_clickme "arrow" + set cursor_runmode_thicken "sb_v_double_arrow" + set cursor_runmode_addpoint "plus" + set cursor_editmode_nothing "hand2" + set cursor_editmode_connect "circle" + set cursor_editmode_disconnect "X_cursor" +} 2 { + # Mac OS X + set cursor_runmode_nothing "arrow" + set cursor_runmode_clickme "center_ptr" + set cursor_runmode_thicken "sb_v_double_arrow" + set cursor_runmode_addpoint "plus" + set cursor_editmode_nothing "hand2" + set cursor_editmode_connect "circle" + set cursor_editmode_disconnect "X_cursor" +} } + if {$pd_nt == 1} { global pd_guidir global pd_tearoff Index: g_editor.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/g_editor.c,v retrieving revision 1.20 diff -u -w -r1.20 g_editor.c --- g_editor.c 9 Oct 2006 04:36:12 -0000 1.20 +++ g_editor.c 6 Nov 2007 02:10:48 -0000 @@ -729,17 +729,13 @@ /* ------------------------ event handling ------------------------ */
static char *cursorlist[] = { -#ifdef MSW - "right_ptr", /* CURSOR_RUNMODE_NOTHING */ -#else - "left_ptr", /* CURSOR_RUNMODE_NOTHING */ -#endif - "arrow", /* CURSOR_RUNMODE_CLICKME */ - "sb_v_double_arrow", /* CURSOR_RUNMODE_THICKEN */ - "plus", /* CURSOR_RUNMODE_ADDPOINT */ - "hand2", /* CURSOR_EDITMODE_NOTHING */ - "circle", /* CURSOR_EDITMODE_CONNECT */ - "X_cursor" /* CURSOR_EDITMODE_DISCONNECT */ + "$cursor_runmode_nothing", + "$cursor_runmode_clickme", + "$cursor_runmode_thicken", + "$cursor_runmode_addpoint", + "$cursor_editmode_nothing", + "$cursor_editmode_connect", + "$cursor_editmode_disconnect" };
void canvas_setcursor(t_canvas *x, unsigned int cursornum)