Return cpdf.top to working order

This commit is contained in:
John Whitington 2022-01-11 19:13:46 +00:00
parent a6672ec993
commit 66f49593cb

View File

@ -1 +1,4 @@
let _ = Cpdfcommand.go ()
let _ =
match Filename.basename Sys.argv.(0) with
"cpdf.top" -> ()
| _ -> Cpdfcommand.go ()