Commit 5f809c02 authored by Jonathan Wilkes's avatar Jonathan Wilkes

fix #254: add l2ork version to [pdinfo]

parent 1ef71125
......@@ -859,6 +859,15 @@ void pdinfo_version(t_pdinfo *x, t_symbol *s, int argc, t_atom *argv)
info_out((t_text *)x, s, 3, at);
}
void pdinfo_l2ork_version(t_pdinfo *x, t_symbol *s, int argc, t_atom *argv)
{
char buf[MAXPDSTRING];
t_atom at[1];
sprintf(buf, PD_L2ORK_VERSION " " PD_BUILD_VERSION);
SETSYMBOL(at, gensym(buf));
info_out((t_text *)x, s, 1, at);
}
void pdinfo_print(t_pdinfo *x)
{
info_print((t_text *)x);
......@@ -930,6 +939,8 @@ void pdinfo_setup(void)
gensym("samplerate"), A_GIMME, 0);
class_addmethod(pdinfo_class, (t_method)pdinfo_version,
gensym("version"), A_GIMME, 0);
class_addmethod(pdinfo_class, (t_method)pdinfo_l2ork_version,
gensym("l2ork_version"), A_GIMME, 0);
class_addmethod(pdinfo_class, (t_method)pdinfo_print,
gensym("print"), 0);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment