Incorrect rmd chunk name

[renkun-ken]

The following Rmd chunk got the wrong name:

```{r eval=FALSE}
x <- rnorm(100)
y <- rnorm(100)
m <- lm(y ~ x)

fun1 <- function(x, y) {
  x + y
}
```

get_rmd_document_sections() returns eval=FALSE as its name.