## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>", 
  eval = FALSE
)

## ----setup, eval=TRUE---------------------------------------------------------
library(gfonts)

## -----------------------------------------------------------------------------
# setup_font(
#   id = "roboto",
#   output_dir = "www",
#   variants = "regular"
# )

## ----eval=gfonts:::is_service_ok()--------------------------------------------
head(get_all_fonts())

## -----------------------------------------------------------------------------
# use_font("roboto", "www/css/roboto.css")

## -----------------------------------------------------------------------------
# fluidPage(
# 
#   tags$link(rel = "stylesheet", type = "text/css", href = "css/roboto.css"),
#   tags$style("body {font-family: 'Roboto', sans-serif;}")
# 
# )

## -----------------------------------------------------------------------------
# download_font(
#   id = "roboto",
#   output_dir = "azerty",
#   variants = c("regular", "300italic", "700")
# )

## -----------------------------------------------------------------------------
# generate_css("roboto", "regular", font_dir = "path/to/font")

## ----eval=gfonts:::is_service_ok(), echo=FALSE--------------------------------
cat(generate_css("roboto", "regular", font_dir = "path/to/"))