mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-14 00:59:30 +02:00
rtl-extra: fix printer device
This commit is contained in:
parent
a57a2b6cbe
commit
454365325e
@ -24,6 +24,6 @@ implementation
|
||||
|
||||
begin
|
||||
(* WARNING: has to be checked; do_open('PRN') returns a valid, negative OS handle *)
|
||||
InitPrinter ('PRN');
|
||||
InitPrinter ('PRN:');
|
||||
SetPrinterExit;
|
||||
end.
|
||||
|
Loading…
Reference in New Issue
Block a user