Explorar el Código

* renamed error constants in 1.1

peter hace 23 años
padre
commit
4cf75a691d
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      packages/extra/cdrom/lincd.pp

+ 1 - 1
packages/extra/cdrom/lincd.pp

@@ -47,7 +47,7 @@ Type
 {$PACKRECORDS C}
 
 const
-   EDRIVE_CANT_DO_THIS = Sys_EOPNOTSUPP ; // = 95
+   EDRIVE_CANT_DO_THIS = {$ifdef ver1_0}Sys_EOPNOTSUPP{$else}ESysEOPNOTSUPP{$endif}; // = 95
    CDROMPAUSE = $5301;
    CDROMRESUME = $5302;
    CDROMPLAYMSF = $5303;