From 6a95171bd329eb2b1412b22f0288ac6305bfa3ce Mon Sep 17 00:00:00 2001
From: noerw <noerw@gmx.de>
Date: Thu, 18 Jan 2018 17:38:35 +0100
Subject: [PATCH] fix [.osem_measurements

regression from 6d2f6f6
---
 R/measurement_utils.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/measurement_utils.R b/R/measurement_utils.R
index 3291be9..dc97c1b 100644
--- a/R/measurement_utils.R
+++ b/R/measurement_utils.R
@@ -42,8 +42,8 @@ mutate.osem_measurements = dplyr_class_wrapper(osem_as_measurements)
 #' @noRd
 #' @export
 `[.osem_measurements` = function(x, i, ...) {
-  s = NextMethod('[')
-  mostattributes(s) = attributes(s)
+  s = NextMethod()
+  mostattributes(s) = attributes(x)
   s
 }