gryf/pentadactyl-pm
1
0
Fork 0
mirror of https://github.com/gryf/pentadactyl-pm.git synced 2025-12-19 03:40:17 +01:00
Code Issues Projects Releases Wiki Activity

Slight modification to make_jar.sh.

Browse Source
This commit is contained in:
Kris Maglione
2015-03-15 16:20:49 -07:00
parent 1bcc5502e7
commit aca9da828c
1 changed files with 13 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
common/make_jar.sh
View File

@@ -37,22 +37,23 @@ then
}
fi
mungeliterals=$(cat <<'!'
local $/;
$_ = <>;
s{(?<!function )\bliteral\((?:function \(\) )?/\*(.*?)\*/\$?\)}{
my $s = $1;
$s =~ s/[\\']/\\$&/g;
$s =~ s/\n/\\n\\$&/g;
"/* Preprocessors FTW. */ '$s'";
}ges;
print;
mungeliterals_() {
cat <<'!'
local $/;
$_ = <>;
s{(?<!function )\bliteral\((?:function \(\) )?/\*(.*?)\*/\$?\)}{
my $s = $1;
$s =~ s/[\\']/\\$&/g;
$s =~ s/\n/\\n\\$&/g;
"/* Preprocessors FTW. */ '$s'";
}ges;
print;
!
)
}
mungeliterals() {
if which perl >/dev/null 2>&1
then perl -e "$mungeliterals"
then perl -e "$(mungeliterals_)"
else cat
fi
}