From 33dad854bedc69c96c041981d55075b6b4aae485 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Mon, 26 Sep 2011 05:25:47 +0000
Subject: added all-lower-case aliases to all objects since Max/MSP 4.6
 converted to all lowercase

svn path=/trunk/externals/miXed/; revision=15349
---
 cyclone/sickle/Clip.c | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'cyclone/sickle/Clip.c')

diff --git a/cyclone/sickle/Clip.c b/cyclone/sickle/Clip.c
index d6efd96..0eb0136 100644
--- a/cyclone/sickle/Clip.c
+++ b/cyclone/sickle/Clip.c
@@ -55,5 +55,11 @@ void Clip_tilde_setup(void)
     clip_class = class_new(gensym("Clip~"),
 			   (t_newmethod)clip_new, 0,
 			   sizeof(t_clip), 0, A_GIMME, 0);
+    class_addcreator((t_newmethod)clip_new, gensym("clip~"), A_GIMME, 0);
     sic_setup(clip_class, clip_dsp, SIC_FLOATTOSIGNAL);
 }
+
+void clip_tilde_setup(void)
+{
+    Clip_tilde_setup();
+}
-- 
cgit v1.2.1