Enabling languages (other than English) to appear as tooltips and other buttons in video.js widgets.

addVideoLanguages(video, languages)

availableLanguages()

Arguments

video

A video

languages

A character vector of languages to support in the video. See availableVideoLanguages() for a full list

Value

An updated video with extra language support

Details

If any languages are missing, you can add a separate script in the head of the application that will apply the language to all videos. See https://videojs.com/guides/languages/ for more details

Examples

video <- video("https://vjs.zencdn.net/v/oceans.mp4")
video <- addVideoLanguages(video, c("es", "fr", "de"))

if (interactive()) {
  library(shiny)

  ui <- fluidPage(lang = "fr", video)
  server <- function(input, output) {}
  shinyApp(ui, server)
}