qbit/werc
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

bin/werclib.rc: replace fn datei and fn datet (both broken) with fn ndate (implements 9front's date -i, -m, and -t)

Browse Source
This commit is contained in:
stanley lieber 2019-12-07 21:55:00 -05:00
parent e46212286c
commit 4f42153162
1 changed files with 10 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
bin/werclib.rc
View File

@ -120,10 +120,8 @@ fn get_file_title {
}
}
fn datei { datet | sed 's/T.*$//' }
fn datet {
date=`{read}
fn ndate {
date=`{date}
switch($date(2)){
case Jan; mo=01
case Feb; mo=02
@ -352,7 +350,14 @@ fn datet {
case YEKT; tz=+0500
case Z; tz=+0000
}
echo $date(6)^-$mo-$da^T^$date(4)^$tz
switch($1){
case -i
echo $date(6)^-$mo-$da
case -m
echo $date(1)^, $da $date(2) $date(6) $date(4) $tz
case -t
echo $date(6)^-$mo-$da^T^$date(4)^$tz
}
}
##########################################################################