From f30bc9c185d8468a01bb651c5ad6beb126d5298a Mon Sep 17 00:00:00 2001
From: Norwin Roosen <github@nroo.de>
Date: Tue, 4 Sep 2018 11:32:54 +0200
Subject: [PATCH] pass on ... in plot.sensebox()

fixes #24
---
 R/box_utils.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/box_utils.R b/R/box_utils.R
index 494a147..0220b4d 100644
--- a/R/box_utils.R
+++ b/R/box_utils.R
@@ -22,8 +22,8 @@ plot.sensebox = function (x, ..., mar = c(2, 2, 1, 1)) {
 
   oldpar = par()
   par(mar = mar)
-  plot(world, col = 'gray', xlim = bbox[c(1, 3)], ylim = bbox[c(2, 4)], axes = T)
-  plot(geom, add = T, col = x$exposure)
+  plot(world, col = 'gray', xlim = bbox[c(1, 3)], ylim = bbox[c(2, 4)], axes = T, ...)
+  plot(geom, add = T, col = x$exposure, ...)
   legend('left', legend = levels(x$exposure), col = 1:length(x$exposure), pch = 1)
   par(mar = oldpar$mar)