Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
David MacDonald
purr-data
Commits
570221da
Commit
570221da
authored
Mar 24, 2011
by
Ivica Bukvic
Committed by
Hans-Christoph Steiner
Nov 02, 2011
Browse files
Pd-0.42.5-extended-l2ork-dev-20110324.tar.bz2
parent
12e3f904
Changes
5
Hide whitespace changes
Inline
Side-by-side
src/g_canvas.c
View file @
570221da
...
...
@@ -638,10 +638,14 @@ void canvas_reflecttitle(t_canvas *x)
x
,
x
->
gl_dirty
,
canvas_getdir
(
x
)
->
s_name
,
x
->
gl_name
->
s_name
);
sys_vgui
(
"wm title .x%lx {%s%s}
\n
"
,
x
,
x
->
gl_name
->
s_name
,
namebuf
);
#else
if
(
glist_istoplevel
(
x
)
||
!
x
->
gl_isgraph
||
x
->
gl_isgraph
&&
x
->
gl_havewindow
||
x
->
gl_loading
)
if
(
glist_istoplevel
(
x
)
||
!
x
->
gl_isgraph
||
x
->
gl_isgraph
&&
x
->
gl_havewindow
||
x
->
gl_loading
||
x
->
gl_dirty
)
{
/*fprintf(stderr,"%d %d %d %d %d\n", glist_istoplevel(x), !x->gl_isgraph,
x->gl_isgraph && x->gl_havewindow, x->gl_loading,
x->gl_dirty);*/
sys_vgui
(
"wm title .x%lx {%s%c%s - %s}
\n
"
,
x
,
x
->
gl_name
->
s_name
,
(
x
->
gl_dirty
?
'*'
:
' '
),
namebuf
,
canvas_getdir
(
x
)
->
s_name
);
}
#endif
}
...
...
src/g_editor.c
View file @
570221da
...
...
@@ -2588,6 +2588,7 @@ void canvas_key(t_canvas *x, t_symbol *s, int ac, t_atom *av)
}
rtext_key
(
x
->
gl_editor
->
e_textedfor
,
(
int
)
keynum
,
gotkeysym
);
canvas_fixlinesfor
(
x
,
(
t_text
*
)(
x
->
gl_editor
->
e_selection
->
sel_what
));
if
(
x
->
gl_editor
->
e_textdirty
)
canvas_dirty
(
x
,
1
);
}
...
...
@@ -3307,7 +3308,6 @@ static void canvas_dopaste(t_canvas *x, t_binbuf *b)
if
(
!
canvas_undo_name
||
canvas_undo_name
[
0
]
!=
'd'
)
{
canvas_redraw
(
x
);
}
//sys_vgui(".x%lx.c create line 0 0 100 100 -width 3 -fill black -tags tcltastic\n", x);
sys_vgui
(
"pdtk_canvas_getscroll .x%lx.c
\n
"
,
x
);
glist_donewloadbangs
(
x
);
}
...
...
@@ -3471,7 +3471,7 @@ void canvas_connect(t_canvas *x, t_floatarg fwhoout, t_floatarg foutno,
if
(
!
(
oc
=
obj_connect
(
objsrc
,
outno
,
objsink
,
inno
)))
goto
bad
;
if
(
glist_isvisible
(
x
))
{
sys_vgui
(
".x%lx.c create line %d %d %d %d -width %d -fill %s -tags l%lx
\n
"
,
sys_vgui
(
".x%lx.c create line %d %d %d %d -width %d -fill %s -tags
{
l%lx
all_cords}
\n
"
,
glist_getcanvas
(
x
),
0
,
0
,
0
,
0
,
(
obj_issignaloutlet
(
objsrc
,
outno
)
?
2
:
1
),
(
obj_issignaloutlet
(
objsrc
,
outno
)
?
"$signal_cord"
:
"$msg_cord"
),
oc
);
...
...
src/g_text.c
View file @
570221da
...
...
@@ -133,8 +133,9 @@ static void canvas_objtext(t_glist *gl, int xpix, int ypix, int selected,
if
(
pd_class
(
&
x
->
ob_pd
)
==
voutlet_class
)
canvas_resortoutlets
(
glist_getcanvas
(
gl
));
canvas_unsetcurrent
((
t_canvas
*
)
gl
);
if
(
glist_isvisible
(
((
t_canvas
*
)
gl
)
)
)
sys_vgui
(
"pdtk_canvas_getscroll .x%lx.c
\n
"
,
(
t_int
)
gl
);
if
(
glist_isvisible
(
((
t_canvas
*
)
gl
)
)
)
{
sys_vgui
(
"pdtk_canvas_getscroll .x%lx.c
\n
"
,
glist_getcanvas
(
gl
));
}
}
extern
int
sys_noautopatch
;
...
...
src/m_class.c
View file @
570221da
...
...
@@ -707,6 +707,7 @@ void pd_typedmess(t_pd *x, t_symbol *s, int argc, t_atom *argv)
}
for
(
i
=
c
->
c_nmethod
,
m
=
c
->
c_methods
;
i
--
;
m
++
)
if
(
m
->
me_name
==
s
)
//if (m && m->me_name == s)
{
wp
=
m
->
me_arg
;
if
(
*
wp
==
A_GIMME
)
...
...
src/m_pd.h
View file @
570221da
...
...
@@ -11,7 +11,7 @@ extern "C" {
#define PD_MAJOR_VERSION 0
#define PD_MINOR_VERSION 42
#define PD_BUGFIX_VERSION 5
#define PD_TEST_VERSION "extended-l2ork-201103
16
"
#define PD_TEST_VERSION "extended-l2ork-201103
24
"
/* old name for "MSW" flag -- we have to take it for the sake of many old
"nmakefiles" for externs, which will define NT and not MSW */
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment