### Bug description

## Example 1

````
---
title: "syntax_highlighting_bug"
format:
  html:
    code-link: false
---

```{r}
f <- function(x){
  y <- 1+2+3
  
  z <- (x+y)^2
  
  return(z)
}
```
````

### Output
<img width="872" alt="Screen Shot 2022-10-22 at 10 47 18" src="https://user-images.githubusercontent.com/25734232/197348603-509c9933-2ec6-41b5-9ed4-87724e6f23ed.png">

## Example 2

````
---
title: "syntax_highlighting_bug"
format:
  html:
    code-link: true
---

```{r}
f <- function(x){
  y <- 1+2+3
  
  z <- (x+y)^2
  
  return(z)
}
```
````

### Output
<img width="869" alt="Screen Shot 2022-10-22 at 10 47 31" src="https://user-images.githubusercontent.com/25734232/197348595-f6281796-7cd1-4158-a505-726de2001cdc.png">

## System Info

RStudio 2022.07.2+576 "Spotted Wakerobin" Release (e7373ef832b49b2a9b88162cfe7eac5f22c40b34, 2022-09-06) for macOS

Mozilla/5.0 (Macintosh; Intel Mac OS X 12_6_0) AppleWebKit/537.36 (KHTML, like Gecko) QtWebEngine/5.12.10 Chrome/69.0.3497.128 Safari/537.36

```
❯ quarto -V
1.1.251
```

R version 4.0.5 Patched (2021-06-20 r80990) -- "Shake and Throw"
Copyright (C) 2021 The R Foundation for Statistical Computing
Platform: x86_64-apple-darwin17.0 (64-bit)


### Checklist

- [X] Please include a minimal, fully reproducible example in a single .qmd file? Please provide the whole file rather than the snippet you believe is causing the issue.
- [X] Please [format your issue](https://quarto.org/bug-reports.html#formatting-make-githubs-markdown-work-for-us) so it is easier for us to read the bug report.
- [X] Please document the RStudio IDE version you're running (if applicable), by providing the value displayed in the "About RStudio" main menu dialog?
- [X] Please document the operating system you're running. If on Linux, please provide the specific distribution.
2022-10-22T15:49:21Z
maxdrohde
bug
closed
`code-link: true` option removes syntax highlighting
https://github.com/quarto-dev/quarto-cli/issues/2979