diff --git a/DESCRIPTION b/DESCRIPTION
index fe81957..d9d4546 100755
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: plotrix
-Version: 3.8-7
+Version: 3.8-8
 Title: Various Plotting Functions
 Authors@R: c(
   person("Jim", "Lemon", role = "aut"),
diff --git a/NEWS b/NEWS
index 0d34dde..39b34b3 100755
--- a/NEWS
+++ b/NEWS
@@ -1,6 +1,8 @@
-Changes in version 3.8-7 (2025-11-12)
+Changes in version 3.8-8 (2025-11-12)
 
   - Fixed warnings in `gap.plot()` when there were 2 gaps.
+  
+  - Fixed `pie3D()` which skipped very small slices (issue #9).
 
 Changes in version 3.8-6 (2023-11-13)
 
diff --git a/R/pie3D.R b/R/pie3D.R
index 69fe8e7..f9193d9 100644
--- a/R/pie3D.R
+++ b/R/pie3D.R
@@ -26,7 +26,7 @@ draw.tilted.sector<-function(x=0,y=0,edges=NA,radius=1,height=0.1,
  theta=pi/6,start=0,end=pi*2,border=par("fg"),col=par("bg"),explode=0,
  shade=0.8) {
 
- if(is.na(edges)) edges<-trunc(20*(end-start))
+ if(is.na(edges)) edges<-max(1, trunc(20*(end-start)))
  angleinc<-(end-start)/edges
  angles<-c(seq(start,end,by=angleinc),end)
  viscurve<-(angles>=pi)&(angles<=2*pi)