From 48518fa9c1c7d24ac777a2942d1eb49e05d2687e Mon Sep 17 00:00:00 2001
From: joye <joye>
Date: Wed, 4 Sep 2013 19:40:07 +0000
Subject: *** empty log message ***

---
 src/bltGrMisc.C  | 14 ++++++++++++++
 src/bltGrPenOp.C |  2 +-
 2 files changed, 15 insertions(+), 1 deletion(-)

diff --git a/src/bltGrMisc.C b/src/bltGrMisc.C
index 377f93f..2b51606 100644
--- a/src/bltGrMisc.C
+++ b/src/bltGrMisc.C
@@ -1991,6 +1991,20 @@ static Blt_OpSpec arcBallOps[] =
 };
 static int nArcBallOps = sizeof(arcBallOps) / sizeof(Blt_OpSpec);
 
+static int
+ArcBallCmd(ClientData clientData, Tcl_Interp *interp, int objc, 
+	   Tcl_Obj *const *objv)
+{
+    Tcl_ObjCmdProc *proc;
+
+    proc = Blt_GetOpFromObj(interp, nArcBallOps, arcBallOps, BLT_OP_ARG1, 
+			    objc, objv, 0);
+    if (proc == NULL) {
+	return TCL_ERROR;
+    }
+    return (*proc) (clientData, interp, objc, objv);
+}
+
 #undef Tk_GetPixmap
 Pixmap 
 Blt_GetPixmap(Display *display, Drawable drawable, int w, int h, int depth,
diff --git a/src/bltGrPenOp.C b/src/bltGrPenOp.C
index b370f25..8c6f0ae 100644
--- a/src/bltGrPenOp.C
+++ b/src/bltGrPenOp.C
@@ -303,7 +303,7 @@ DestroyPen(Pen *penPtr)
     Blt_FreeOptions(penPtr->configSpecs, (char *)penPtr, graphPtr->display, 0);
     (*penPtr->destroyProc) (graphPtr, penPtr);
     if ((penPtr->name != NULL) && (penPtr->name[0] != '\0')) {
-	free(penPtr->name);
+      free((void*)(penPtr->name));
     }
     if (penPtr->hashPtr != NULL) {
 	Blt_DeleteHashEntry(&graphPtr->penTable, penPtr->hashPtr);
-- 
cgit v0.12