diff options
| author | Lua Team <team@lua.org> | 1996-05-14 12:00:00 +0000 |
|---|---|---|
| committer | repogen <> | 1996-05-14 12:00:00 +0000 |
| commit | 721542976ebc89f2f8d17d19be7e4426570b69be (patch) | |
| tree | 0c79a45c63aa89d6e4b8ac80931e46d74a72f8cb /test/examples/ps | |
| parent | 71754d2f6423fb9b6e87658e58bafc5470d53f65 (diff) | |
| download | lua-github-2.4.tar.gz | |
Lua 2.42.4
Diffstat (limited to 'test/examples/ps')
| -rw-r--r-- | test/examples/ps/ps.lua | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/test/examples/ps/ps.lua b/test/examples/ps/ps.lua index 62b4e173..0d749194 100644 --- a/test/examples/ps/ps.lua +++ b/test/examples/ps/ps.lua @@ -1,7 +1,7 @@ -- ps.lua -- lua interface to postscript -- Luiz Henrique de Figueiredo (lhf@csg.uwaterloo.ca) --- 12 Nov 95 +-- 14 May 96 PS={} @@ -12,15 +12,11 @@ end -------------------------------------------------------------------- control -- function PS.open(title) - local d,m,y=date() - local H,M,S=time() - if d<10 then d="0"..d end - if m<10 then m="0"..m end if title==nil then title="(no title)" end P("%!PS-Adobe-2.0 EPSF-1.2") P("%%Title: "..title) - P("%%Creator: ps.lua from Lua 2.2") - P("%%CreationDate: "..y..m..d.." "..H..":"..M..":"..S) + P("%%Creator: ps.lua from Lua 2.4") + P("%%CreationDate: "..date()) P("%%Pages: (atend)") P("%%BoundingBox: (atend)") P("%%EndComments") |