minor

Author: davidgohel

R/compress_images.R

@@ -48,7 +48,8 @@ compress_images <- function(input, output = NULL, verbose = TRUE, overwrite = FA
                             jpg_quality = "75", png_quality = "20-50", gif_colors = "64"){
 
   compimg_dir <- working_directory()
-
+  if(!compress_images_available())
+    stop("compress-images is not available, run `compress_images_install()` to install it.")
   if(substr(output, nchar(output), nchar(output) ) != "/") {
     output <- paste0(output, "/")
   }

README.Rmd

@@ -23,7 +23,7 @@ opts_chunk$set(
 [![R-CMD-check](https://github.com/ardata-fr/minimage/workflows/R-CMD-check/badge.svg)](https://github.com/ardata-fr/minimage/actions)
 <!-- badges: end -->
 
-The goal of minimage is to ket users minify size images.
+The goal of minimage is to let users minify size images.
 
 The main function allows to compress the images contained in a directory to another 
 directory, optionally changing some compression parameters.

README.md

@@ -10,7 +10,7 @@ experimental](https://img.shields.io/badge/lifecycle-experimental-orange.svg)](h
 [![R-CMD-check](https://github.com/ardata-fr/minimage/workflows/R-CMD-check/badge.svg)](https://github.com/ardata-fr/minimage/actions)
 <!-- badges: end -->
 
-The goal of minimage is to ket users minify size images.
+The goal of minimage is to let users minify size images.
 
 The main function allows to compress the images contained in a directory
 to another directory, optionally changing some compression parameters.
@@ -50,7 +50,7 @@ compress_images("test-files/", "test-new-files/", png_quality = "90-100",
 
 | input                  | size\_in | path\_out                  | size\_out | percent | algorithm | copied |
 | :--------------------- | -------: | :------------------------- | --------: | ------: | :-------- | :----- |
-| test-files/file\_2.png |    10409 | test-new-files/file\_2.png |      2288 |   78.02 | pngquant  | TRUE   |
 | test-files/file\_1.png |    10386 | test-new-files/file\_1.png |      2299 |   77.86 | pngquant  | TRUE   |
+| test-files/file\_2.png |    10409 | test-new-files/file\_2.png |      2288 |   78.02 | pngquant  | TRUE   |
 
 </div>