From 13889d99405e5b3b703342d59b5478f51cbbd5bd Mon Sep 17 00:00:00 2001 From: Kevin Walzer Date: Mon, 16 Sep 2013 01:59:36 +0000 Subject: Fix for http://core.tcl.tk/tk/info/8eb56719cf on broken build with 8.5.15 with clang on OS X, thanks to Ned Deily for patch --- macosx/tkMacOSXClipboard.c | 2 +- macosx/tkMacOSXDraw.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/macosx/tkMacOSXClipboard.c b/macosx/tkMacOSXClipboard.c index 7cd9c30..6ac7830 100644 --- a/macosx/tkMacOSXClipboard.c +++ b/macosx/tkMacOSXClipboard.c @@ -168,6 +168,7 @@ XSetSelectionOwner( changeCount = [pb declareTypes:[NSArray array] owner:NSApp]; } } + return Success; } /* @@ -194,7 +195,6 @@ TkMacOSXSelDeadWindow( if (winPtr && winPtr == (TkWindow *)clipboardOwner) { clipboardOwner = NULL; } - return Success; } /* diff --git a/macosx/tkMacOSXDraw.c b/macosx/tkMacOSXDraw.c index 4eb4a88..58ae495 100644 --- a/macosx/tkMacOSXDraw.c +++ b/macosx/tkMacOSXDraw.c @@ -347,6 +347,7 @@ TkPutImage( TkMacOSXDbgMsg("Invalid destination drawable"); } TkMacOSXRestoreDrawingContext(&dc); + return Success; } /* @@ -744,7 +745,6 @@ DrawCGImage( } else { TkMacOSXDbgMsg("Drawing of empty CGImage requested"); } - return Success; } /* -- cgit v0.12