diff --git a/tecsdriv.c b/tecsdriv.c
index a8e0b56f..bb2d8d60 100644
--- a/tecsdriv.c
+++ b/tecsdriv.c
@@ -87,8 +87,6 @@
     pEVControl self = NULL;
     char pBueffel[256];
     int iRet;
-    double fNum;
-    float fVal;
     pEVDriver pD;
     pTecsDriv pMe;
     char *dev;
@@ -108,13 +106,6 @@
     {
        if(argc > 2) /* set case */
        {
-         iRet = Tcl_GetDouble(pSics->pTcl,argv[2],&fNum);
-         if(iRet != TCL_OK)
-         {
-           sprintf(pBueffel,"ERROR: expected number, got %s",argv[2]);
-           SCWrite(pCon,pBueffel,eError);
-           return 0;
-         }
          pD=self->pDriv; assert(pD);
          pMe=pD->pPrivate; assert(pMe);
          iRet=TeccSetDev(pMe->pData,argv[2]);