diff --git a/harbour/source/debug/debugger.prg b/harbour/source/debug/debugger.prg index 9878c91f82..65721a9167 100644 --- a/harbour/source/debug/debugger.prg +++ b/harbour/source/debug/debugger.prg @@ -357,7 +357,7 @@ METHOD HandleEvent() CLASS TDebugger do case case nKey == K_LBUTTONDOWN - Alert( Str( MCol() ) + ", " + Str( MRow() ) ) + Alert( Str( MRow() ) + ", " + Str( MCol() ) ) case nKey == K_RBUTTONDOWN Alert( "K_RBUTTONDOWN" ) @@ -1551,4 +1551,4 @@ static function ValToStr( uVal ) cResult = "Class " + uVal:ClassName() + " object" endcase -return cResult +return cResult \ No newline at end of file