Merge pull request #28 from insilentio/devel

insilentio · web-flow · commit b3eb68b25e6a · 2025-08-16T20:48:37.000+02:00
same as before... forgot to to it for after_export
diff --git a/R/after_export.R b/R/after_export.R
@@ -18,7 +18,7 @@ after_export <- function(imp_path, exp_path = NULL){
   }
 
   # ON1 generates new xmp upon "read metadata from photo" in the previous step, let's delete them again
-  system(paste0("find '", imp_path, "' -name '*xmp' -exec rm {} \\;"))
+  system(paste0('find "', imp_path, '" -name "*xmp" -exec rm {} \\;'))
   
   # ON1 does not export 35mm focal length info nor lens type, must be added after jpg generation
   if (is.null(exp_path)) {
diff --git a/data/cropFactor.rda b/data/cropFactor.rda
diff --git a/inst/extdata/cropFactor.csv b/inst/extdata/cropFactor.csv
@@ -12,5 +12,6 @@ iPhone 15 Pro,Apple 2.69mm f/1.9,8.55
 iPhone 15 Pro,Apple 9mm f/2.8,8.56
 iPhone 13 mini,Apple 5.1mm f/1.6,5.1
 iPhone 13 mini,Apple 2.71mm f/2.2,8.52
+iPhone 13 mini,Apple 1.54mm f/2.4,8.44
 iPhone 12,Apple 4.2mm f/1.6,6.2
 

Original file line number	Diff line number	Diff line change
`@@ -18,7 +18,7 @@ after_export <- function(imp_path, exp_path = NULL){`
`18`	`18`	`}`
`19`	`19`
`20`	`20`	`# ON1 generates new xmp upon "read metadata from photo" in the previous step, let's delete them again`
`21`		`- system(paste0("find '", imp_path, "' -name '*xmp' -exec rm {} \\;"))`
	`21`	`+ system(paste0('find "', imp_path, '" -name "*xmp" -exec rm {} \\;'))`
`22`	`22`
`23`	`23`	`# ON1 does not export 35mm focal length info nor lens type, must be added after jpg generation`
`24`	`24`	`if (is.null(exp_path)) {`