diff --git a/R/facet-wrap.r b/R/facet-wrap.r
index a5316a66a3..4a65de8f6c 100644
--- a/R/facet-wrap.r
+++ b/R/facet-wrap.r
@@ -215,7 +215,7 @@ FacetWrap <- ggproto("FacetWrap", Facet,
     # ask the coordinate system if it wants to specify one
     aspect_ratio <- theme$aspect.ratio
     if (is.null(aspect_ratio) && !params$free$x && !params$free$y) {
-      aspect_ratio <- coord$aspect(panel$ranges[[1]])
+      aspect_ratio <- coord$aspect(ranges[[1]])
     }
 
     if (is.null(aspect_ratio)) {