ref: 34576313160661592af3efa13c97e3d261a3ce53
parent: 2d6bbef1ba45ceb41742387038400e1358cb7573
author: qwx <qwx@sciops.net>
date: Tue Mar 10 21:00:44 EDT 2020
aconv,mfmt: small fixes
--- a/aconv
+++ b/aconv
@@ -7,5 +7,5 @@
pref=$1
for(i in $*(2-)){
echo $i
- 2opus $*(2-) <$i >`{echo $i | mfmt $pref opus}
+ 2opus $parm <$i >`{echo $i | mfmt $pref opus}
}
--- a/mfmt
+++ b/mfmt
@@ -11,6 +11,6 @@
s/( - | |_)/./g
s/\.[^\.]+$/.'^$fmt^'/
s/ /./g
- s/\.\././g
+ s/\.\.+/./g
' |\
- tr A-Z a-z
+ tr A-ZА-Я a-zа-я