diff --git a/LuaLibs/BeamExec.lua b/LuaLibs/BeamExec.lua
index 114a883..a793209 100644
--- a/LuaLibs/BeamExec.lua
+++ b/LuaLibs/BeamExec.lua
@@ -1320,12 +1320,12 @@ local function SetDrillingsToMachineAfterHeadOrTailCut( vProc, vMachineBeforeInt
             if vMachineBeforeIntersectingDrillings.Head.Box and vProc[i].Box:getMin():getX() < vMachineBeforeIntersectingDrillings.Head.Box:getMax():getX() + 100 * GEO.EPS_SMALL and
                vMachineBeforeIntersectingDrillings.Head.Box:getMin():getX() < vProc[i].Box:getMax():getX() + 100 * GEO.EPS_SMALL then
                vProc[i].MachineAfterHeadCutId = vMachineBeforeIntersectingDrillings.Head.Id
-               --vProc[i].Head = true
+               vProc[i].Head = true
             -- se esiste intersezione tra il foro e la feature di coda
             elseif vMachineBeforeIntersectingDrillings.Tail.Box and vProc[i].Box:getMin():getX() < vMachineBeforeIntersectingDrillings.Tail.Box:getMax():getX() + 100 * GEO.EPS_SMALL and
                    vMachineBeforeIntersectingDrillings.Tail.Box:getMin():getX() < vProc[i].Box:getMax():getX() + 100 * GEO.EPS_SMALL then
                vProc[i].MachineAfterTailCutId = vMachineBeforeIntersectingDrillings.Tail.Id
-               --vProc[i].Tail = true
+               vProc[i].Tail = true
             end
       end
    end
diff --git a/LuaLibs/ProcessDrill.lua b/LuaLibs/ProcessDrill.lua
index 3b131c7..471a893 100644
--- a/LuaLibs/ProcessDrill.lua
+++ b/LuaLibs/ProcessDrill.lua
@@ -413,7 +413,7 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
    local dToolAddLength = dLen - dMaxElev
    if dDepth - dToolAddLength > dMaxDepth + 10 * GEO.EPS_SMALL then
       sMyWarn = 'Warning in drill : depth (' .. EgtNumToString( dDepth - dToolAddLength, 1) .. ') bigger than max tool depth (' .. EgtNumToString( dMaxDepth, 1) .. ')'
-      dDepth = dMaxDepth + dToolAddLength
+      dDepth = dLen
       EgtOutLog( sMyWarn)
    end
    EgtSetMachiningParam( MCH_MP.DEPTH, dDepth)