Commit 3ecc4eba by Dave Cooper

updated view-object-cache so it doesn't output redundant DXF splines for…

updated view-object-cache so it doesn't output redundant DXF splines for arc-curve and linear-curve.
parent 0e7bd69e
......@@ -447,7 +447,9 @@ the box should be facing. Defaults to <tt>*nominal-y-vector*</tt>."
;;
(curves-2d
(when (typep (the object) 'surf:curve)
(when (and (typep (the object) 'surf:curve)
(not (or (typep (the object) 'surf:arc-curve)
(typep (the object) 'surf:linear-curve))))
(let ((control-points (the object control-points))
(weights (the object weights))
(knot-vector (the object knot-vector))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment