Browse Source

+ removed empty Beep(); function, uses OnBeep now, sysutils should compile again

git-svn-id: trunk@14541 -
Károly Balogh 15 years ago
parent
commit
99a94573ed
1 changed files with 2 additions and 9 deletions
  1. 2 9
      rtl/morphos/sysutils.pp

+ 2 - 9
rtl/morphos/sysutils.pp

@@ -506,15 +506,6 @@ end;
 
 
 
-{****************************************************************************
-                              Misc Functions
-****************************************************************************}
-
-procedure Beep;
-begin
-end;
-
-
 {****************************************************************************
                               Locale Functions
 ****************************************************************************}
@@ -662,6 +653,8 @@ end;
 Initialization
   InitExceptions;
   InitInternational;    { Initialize internationalization settings }
+  OnBeep:=Nil;          { No SysBeep() on MorphOS, for now. Figure out if we want 
+                          to use intuition.library/DisplayBeep() for this (KB) }
 Finalization
   DoneExceptions;
 end.