From b3683d7ffb21113bf2b5815ca19290a46a8d378a Mon Sep 17 00:00:00 2001
From: Przemyslaw Czerpak <druzus@priv.onet.pl>
Date: Mon, 13 Oct 2008 19:45:01 +0000
Subject: [PATCH] 2008-10-13 21:44 UTC+0200 Przemyslaw Czerpak
 (druzus/at/priv.onet.pl)   * harbour/contrib/hbwin/win_tole.prg     ! Fixed
 assignment to oErr:Operation from "+" to "-" in       OleValueMinus() method
 - fix by Luis Krause Mantilla borrowed       from xHarbour

---
 harbour/ChangeLog                  | 6 ++++++
 harbour/contrib/hbwin/win_tole.prg | 2 +-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 814848045b..60ca4c11c3 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,12 @@
    2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2008-10-13 21:44 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
+  * harbour/contrib/hbwin/win_tole.prg
+    ! Fixed assignment to oErr:Operation from "+" to "-" in
+      OleValueMinus() method - fix by Luis Krause Mantilla borrowed
+      from xHarbour
+
 2008-10-13 21:30 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/include/hbwince.h
   * harbour/source/common/hbwince.c
diff --git a/harbour/contrib/hbwin/win_tole.prg b/harbour/contrib/hbwin/win_tole.prg
index 4f56389184..db2ee06d74 100644
--- a/harbour/contrib/hbwin/win_tole.prg
+++ b/harbour/contrib/hbwin/win_tole.prg
@@ -405,7 +405,7 @@ METHOD OleValueMinus( xArg ) CLASS TOleAuto
       oErr:CanSubstitute := .T.
       oErr:Description   := "argument error"
       oErr:GenCode       := EG_ARG
-      oErr:Operation     := '+'
+      oErr:Operation     := '-'
       oErr:Severity      := ES_ERROR
       oErr:SubCode       := 1082
       oErr:SubSystem     := "BASE"