From bd2cb051e09ca5affbad86194668c4d531b402cf Mon Sep 17 00:00:00 2001
From: Viktor Szakats <harbour@syenar.net>
Date: Sun, 11 Nov 2012 23:20:05 +0000
Subject: [PATCH] 2012-11-12 00:17 UTC+0100 Viktor Szakats (harbour syenar.net)
   * extras/superlib/superlib.dif     ! fixed RAT_EVENT() to not hog the CPU
 and also to call       Harbour's idle loop while waiting for events.

---
 harbour/ChangeLog                    |  5 +++++
 harbour/extras/superlib/superlib.dif | 12 ++++++++++--
 2 files changed, 15 insertions(+), 2 deletions(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index e33f39a80a..100b55b7a8 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,11 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2012-11-12 00:17 UTC+0100 Viktor Szakats (harbour syenar.net)
+  * extras/superlib/superlib.dif
+    ! fixed RAT_EVENT() to not hog the CPU and also to call
+      Harbour's idle loop while waiting for events.
+
 2012-11-11 21:41 UTC+0100 Viktor Szakats (harbour syenar.net)
   * contrib/hbct/hbct.hbx
   * contrib/hbct/scrmark.prg
diff --git a/harbour/extras/superlib/superlib.dif b/harbour/extras/superlib/superlib.dif
index 23cf74e6ad..f4267ff7f2 100644
--- a/harbour/extras/superlib/superlib.dif
+++ b/harbour/extras/superlib/superlib.dif
@@ -1009,7 +1009,7 @@ diff -u superori/s_modify.prg superpat/s_modify.prg
              EXIT
 diff -u superori/s_moose.prg superpat/s_moose.prg
 --- superori/s_moose.prg	1995-11-02 16:17:08.000000000 +0100
-+++ superpat/s_moose.prg	2009-06-22 23:36:57.000000000 +0200
++++ superpat/s_moose.prg	2012-11-12 00:07:50.000000000 +0100
 @@ -98,7 +98,13 @@
  
  */
@@ -1025,7 +1025,15 @@ diff -u superori/s_moose.prg superpat/s_moose.prg
  #define MTOP      1
  #define MLEFT     2
  #define MBOTTOM   3
-@@ -747,7 +753,7 @@
+@@ -272,6 +278,7 @@
+                 endif
+         endif
+     endif
++    hb_idleState()
+   enddo
+   #ifndef CLIPPER53
+   if lIsMouse
+@@ -747,7 +754,7 @@
  ³
  ³  Examples:
  ³  ---------