From d6dbc2414a2d7c4ca9534cfe795d76e0035dff18 Mon Sep 17 00:00:00 2001
From: Howard Baek <50791792+howardbaek@users.noreply.github.com>
Date: Fri, 5 Apr 2024 16:53:27 -0700
Subject: [PATCH] Remove line running `get_gs_pptx(url)` from `include_slide()`

---
 R/gs_png.R | 1 -
 1 file changed, 1 deletion(-)

diff --git a/R/gs_png.R b/R/gs_png.R
index 9366c03..da09bba 100644
--- a/R/gs_png.R
+++ b/R/gs_png.R
@@ -97,7 +97,6 @@ gs_png_download <- function(url, output_dir = ".", overwrite = TRUE) {
 include_slide <- function(url,
                           output_dir = knitr::opts_chunk$get("fig.path"),
                           overwrite = TRUE, ...) {
-  get_gs_pptx(url)
   outfile <- gs_png_download(url, output_dir, overwrite = overwrite)
   knitr::include_graphics(outfile, ...)
 }