From anthm@freeswitch.org Mon May 26 11:45:41 2008
From: Freeswitch SVN <anthm@freeswitch.org>
To: freeswitch-trunk@lists.freeswitch.org
Subject: [Freeswitch-trunk] [commit] r8661 -
	freeswitch/trunk/src/mod/languages/mod_perl
Date: Mon, 26 May 2008 11:45:41 -0400
Message-ID: <E1K0etJ-0002lP-34@tron.freeswitch.org>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="===============4308409106657467904=="

--===============4308409106657467904==
Content-Type: text/plain; charset="utf-8"
Content-Transfer-Encoding: quoted-printable

Author: anthm
Date: Mon May 26 11:45:40 2008
New Revision: 8661

Modified:
   freeswitch/trunk/src/mod/languages/mod_perl/mod_perl.c

Log:
update

Modified: freeswitch/trunk/src/mod/languages/mod_perl/mod_perl.c
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D
--- freeswitch/trunk/src/mod/languages/mod_perl/mod_perl.c	(original)
+++ freeswitch/trunk/src/mod/languages/mod_perl/mod_perl.c	Mon May 26 11:45:4=
0 2008
@@ -497,7 +497,7 @@
=20
 	/* connect my internal structure to the blank pointer passed to me */
 	*module_interface =3D switch_loadable_module_create_module_interface(pool, =
modname);
-	SWITCH_ADD_APP(app_interface, "perl", NULL, NULL, perl_function, NULL, SAF_=
NONE);
+	SWITCH_ADD_APP(app_interface, "perl", NULL, NULL, perl_function, NULL, SAF_=
SUPPORT_NOMEDIA);
 	SWITCH_ADD_API(api_interface, "perlrun", "run a script", perlrun_api_functi=
on, "<script>");
 	SWITCH_ADD_API(api_interface, "perl", "run a script", perl_api_function, "<=
script>");
 	/* indicate that the module should continue to be loaded */


--===============4308409106657467904==--