Syntax fix and other minnor improvements
This commit is contained in:
parent
1f376ad60a
commit
272840da52
1 changed files with 7 additions and 4 deletions
|
|
@ -10,13 +10,13 @@ Location: '^$1^'
|
||||||
exit
|
exit
|
||||||
}
|
}
|
||||||
|
|
||||||
fn setvars {
|
fn get_post_args {
|
||||||
ifs='&
|
ifs='&
|
||||||
' for(pair in `{cat}) {
|
' for(pair in `{cat}) {
|
||||||
pair = `{echo -n $pair | sed 's/=/\&/'} \
|
pair = `{echo -n $pair | sed 's/=/\&/'} \
|
||||||
ifs=() \
|
ifs=() \
|
||||||
if(~ $pair(1) $*)
|
if(~ $pair(1) $*)
|
||||||
eval $pair(1)'=`{urldecode $pair(2)}'
|
$pair(1) = `{urldecode $pair(2)}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
@ -36,6 +36,9 @@ fn template { template.awk $* | rc $rcargs }
|
||||||
|
|
||||||
# .rec parsing
|
# .rec parsing
|
||||||
fn parse_rec {
|
fn parse_rec {
|
||||||
sed 's/% *//; /^$/q' < $1
|
for(i in `{sed 's/% *//; /^$/q' < $1}) {
|
||||||
sed -n '/^$/,$p' < $1
|
v = `{echo $i | sed 's/^/rec_/; s/=.*//;'}
|
||||||
|
$v = `{echo $i | sed
|
||||||
|
}
|
||||||
|
rec_data = `{sed -n '/^$/,$p' < $1}
|
||||||
}
|
}
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue