Shinyapps.io Lua errors with pptx

Similar to https://groups.google.com/forum/?nomobile=true#!msg/shinyapps-users/QhIBq7H_1Nk/F3DD9p5MBgAJ, we are having a lua issue with parsing a pptx file on shinyapps.io
Example app is: https://jhubiostatistics.shinyapps.io/nopptx/

which is generated by

library(shiny)
ui <- fluidPage(
    fileInput("pptx_input", "PowerPoint File",
              multiple = FALSE)
)
server <- function(input, output) {}
shinyApp(ui = ui, server = server)

You can download an example file that fails is located at https://github.com/muschellij2/ariExtra/raw/master/inst/extdata/example.pptx

error (in the upload bar - not the log):

<!DOCTYPE HTML><html lang="en"><head><title>Error</title><style type="text/css"> body { color: #222; background: #ddd; font-family: sans-serif; margin: 20px; } h1, h2, pre { margin: 20px; } .box { background: white; overflow: hidden; box-shadow: 1px 1px 8px gray; border-radius: 1px; } .footer { text-align: center; font-family: serif; margin: 10px; font-size: 12px; color: #A7A7A7; } </style></head><body><div class="box"><h1>Error</h1><pre>/usr/share/luajit/share/lua/5.1/lapis/application.lua:73: attempt to index local &#039;curr&#039; (a boolean value)</pre><h2>Traceback</h2><pre> stack traceback: /usr/share/luajit/share/lua/5.1/lapis/application.lua:73: in function &#039;add_params&#039; /usr/share/luajit/share/lua/5.1/lapis/application.lua:394: in function &#039;handler&#039; /usr/share/luajit/share/lua/5.1/lapis/application.lua:416: in function &lt;/usr/share/luajit/share/lua/5.1/lapis/application.lua:412&gt; [C]: in function &#039;xpcall&#039; /usr/share/luajit/share/lua/5.1/lapis/application.lua:412: in function &#039;dispatch&#039; /usr/share/luajit/share/lua/5.1/lapis/nginx.lua:181: in function &#039;serve&#039; access_by_lua(redx.conf:163):1: in function &lt;access_by_lua(redx.conf:163):1&gt;</pre></div><div class="footer">lapis 1.0.4</div></body></html>