summaryrefslogtreecommitdiffstats
path: root/mac/tkMacClipboard.c
diff options
context:
space:
mode:
Diffstat (limited to 'mac/tkMacClipboard.c')
-rw-r--r--mac/tkMacClipboard.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/mac/tkMacClipboard.c b/mac/tkMacClipboard.c
index 75bc131..c1ec15e 100644
--- a/mac/tkMacClipboard.c
+++ b/mac/tkMacClipboard.c
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkMacClipboard.c,v 1.3 1999/04/16 01:51:30 stanton Exp $
+ * RCS: @(#) $Id: tkMacClipboard.c,v 1.4 1999/05/22 06:32:32 jingham Exp $
*/
#include "tkInt.h"
@@ -119,7 +119,7 @@ XSetSelectionOwner(
* It expects a Tk_Window, even though it only needs a Tk_Display.
*/
- tkwin = (Tk_Window)tkMainWindowList->winPtr;
+ tkwin = (Tk_Window) TkGetMainInfoList()->winPtr;
if (selection == Tk_InternAtom(tkwin, "CLIPBOARD")) {
@@ -128,7 +128,7 @@ XSetSelectionOwner(
* owner of the clipboard.
*/
- dispPtr = tkMainWindowList->winPtr->dispPtr;
+ dispPtr = TkGetMainInfoList()->winPtr->dispPtr;
if (dispPtr->clipboardActive) {
return;
}
@@ -283,9 +283,9 @@ TkSuspendClipboard()
* it needs it. (Window list NULL if quiting.)
*/
- if (tkMainWindowList != NULL) {
- Tk_ClearSelection((Tk_Window) tkMainWindowList->winPtr,
- Tk_InternAtom((Tk_Window) tkMainWindowList->winPtr,
+ if (TkGetMainInfoList() != NULL) {
+ Tk_ClearSelection((Tk_Window) TkGetMainInfoList()->winPtr,
+ Tk_InternAtom((Tk_Window) TkGetMainInfoList()->winPtr,
"CLIPBOARD"));
}