This commit is contained in:
psyc://psyced.org/~lynX 2009-01-27 22:48:06 +01:00
parent 47395d9962
commit 09b601eaef

View File

@ -35,8 +35,10 @@ mymsg(source, mc, data, vars) {
qAllowExternal(source, mc, vars) { qAllowExternal(source, mc, vars) {
P3(("qAllowExternal: %O,%O,%O\n", source,mc,vars)) P3(("qAllowExternal: %O,%O,%O\n", source,mc,vars))
unless (stringp(source)) return 0; unless (stringp(source)) return 0;
if (abbrev( "psyc://213.73.91.20:" , source)) return 1; source = lower_case(source);
if (abbrev( "psyc://fly.symlynx.com:" , lower_case(source))) return 1; // should allow for all hostnames and ips of lectern.. oerks
if (abbrev( "psyc://lectern.tobij.de:" , source)) return 1;
if (abbrev( "psyc://psyced.org:" , source)) return 1;
return 0; return 0;
} }
#endif #endif