diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2013-12-12 20:45:59 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2013-12-12 20:45:59 +0200 |
| commit | 9953f4cee02f2781ee5da2e42bcb837c1a849cb0 (patch) | |
| tree | b322336208f51473e694287d8efe0891c4b10c8a /vms/vmstest.com | |
| parent | 70778853494d7ec00a77d42617fdd030c74c9bec (diff) | |
| download | egawk-9953f4cee02f2781ee5da2e42bcb837c1a849cb0.tar.gz egawk-9953f4cee02f2781ee5da2e42bcb837c1a849cb0.tar.bz2 egawk-9953f4cee02f2781ee5da2e42bcb837c1a849cb0.zip | |
First round of VMS changes.
Diffstat (limited to 'vms/vmstest.com')
| -rw-r--r-- | vms/vmstest.com | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vms/vmstest.com b/vms/vmstest.com index 25404373..7b1c3a36 100644 --- a/vms/vmstest.com +++ b/vms/vmstest.com @@ -601,7 +601,7 @@ $ mon = f$cvtime(now,"ABSOLUTE","MONTH") $ mon = f$extract(0,1,mon) + f$edit(f$extract(1,2,mon),"LOWERCASE") $ day = f$cvtime(now,,"DAY") $ tim = f$extract(0,8,f$cvtime(now,,"TIME")) -$ tz = "" +$ tz = f$trnlnm("SYS$TIMEZONE_NAME") $ yr = f$cvtime(now,,"YEAR") $ if f$trnlnm("FTMP").nes."" then close/noLog ftmp $ open/Write ftmp strftime.in |