From a706fe4466d559c1eb52fa849e9769b0d82fc782 Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Thu, 4 Mar 2004 10:23:04 +0000
Subject: Fixes (minor) for perl/Tk 804

---
 Perl/Zinc.xs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'Perl')

diff --git a/Perl/Zinc.xs b/Perl/Zinc.xs
index 323a53a..6a551ad 100644
--- a/Perl/Zinc.xs
+++ b/Perl/Zinc.xs
@@ -22,21 +22,21 @@ ZincObjCmd(
 	   ClientData client_data,
 	   Tcl_Interp* interp,
 	   int argc,
-	   Tcl_Obj *args[]);
+	   Tcl_Obj* CONST args[]);
 
 extern int
 ZnVideomapObjCmd(
 	         ClientData client_data,
 	         Tcl_Interp* interp,
 	         int argc,
-	         Tcl_Obj *args[]);
+	         Tcl_Obj* CONST args[]);
 
 extern int
 ZnMapInfoObjCmd(
 	        ClientData client_data,
 	        Tcl_Interp* interp,
 	        int argc,
-	        Tcl_Obj *args[]);
+	        Tcl_Obj* CONST args[]);
 
 DECLARE_VTABLES;
 TkimgphotoVtab *TkimgphotoVptr;
-- 
cgit v1.1