Skip to content

Commit

Permalink
removed special case
Browse files Browse the repository at this point in the history
  • Loading branch information
tscheypidi committed Jun 25, 2023
1 parent 655348c commit f77396c
Showing 1 changed file with 1 addition and 6 deletions.
7 changes: 1 addition & 6 deletions R/magpie-class.R
Original file line number Diff line number Diff line change
Expand Up @@ -308,12 +308,7 @@ setMethod("[", # nolint
if (length(sys.call(-1)) == 3) {
return(x@.Data[i])
}
if (!missing(k) && .isFALSE(k)) {
# still need to handle weird k=FALSE case separately
x@.Data <- x@.Data[i, j, , drop = FALSE]
} else {
x@.Data <- x@.Data[i, j, k, drop = FALSE]
}
x@.Data <- x@.Data[i, j, k, drop = FALSE]
if (drop) x <- collapseNames(x)
return(x)
}
Expand Down

0 comments on commit f77396c

Please sign in to comment.