mirror of
git://git.psyced.org/git/psyced
synced 2024-08-15 03:25:10 +00:00
17 lines
414 B
C
17 lines
414 B
C
|
#define NAME "Buper"
|
|||
|
|
|
|||
|
|
#include <place.gen>
|
|||
|
|
|
|||
|
|
/* fun room */
|
|||
|
|
|
|||
|
|
msg(source, mc, data, mapping vars) {
|
|||
|
|
string a;
|
|||
|
|
if (stringp(data)) {
|
|||
|
|
// does this need special treatment now that system
|
|||
|
|
// charset is utf8 ? iconv before and after ? lol.
|
|||
|
|
data = regreplace(data, "(^| )([aeiou<6F><75><EFBFBD>AEIOU<4F><55><EFBFBD>])", "\\1b\\2", 1);
|
|||
|
|
data = regreplace(data, "\\<[a-zA-Z]", "b", 1);
|
|||
|
|
}
|
|||
|
|
return ::msg(source, mc, data, vars);
|
|||
|
|
}
|