Fix #4927 (#4928)

Author: thomasp85

Diff for: NEWS.md

@@ -1,5 +1,7 @@
 # ggplot2 (development version)
 
+* `geom_linerange()` now respects the `na.rm` argument (#4927, @thomasp85)
+
 * Improve the support for `guide_axis()` on `coord_trans()` (@yutannihilation, #3959)
 
 * `geom_density()` and `stat_density()` now support `bounds` argument

Diff for: R/geom-linerange.r

@@ -113,11 +113,11 @@ GeomLinerange <- ggproto("GeomLinerange", Geom,
     data
   },
 
-  draw_panel = function(data, panel_params, coord, lineend = "butt", flipped_aes = FALSE) {
+  draw_panel = function(data, panel_params, coord, lineend = "butt", flipped_aes = FALSE, na.rm = FALSE) {
     data <- flip_data(data, flipped_aes)
     data <- transform(data, xend = x, y = ymin, yend = ymax)
     data <- flip_data(data, flipped_aes)
-    ggname("geom_linerange", GeomSegment$draw_panel(data, panel_params, coord, lineend = lineend))
+    ggname("geom_linerange", GeomSegment$draw_panel(data, panel_params, coord, lineend = lineend, na.rm = na.rm))
   },
 
   rename_size = TRUE