new phafi-mode autofocus miniversion

scripts/emacs/phafi-mode.el

@@ -634,6 +634,16 @@
 			))
   )
 
+
+(defun phafi-autofocus-miniversion ()
+  (interactive)
+  (async-shell-command (concat
+			"cd "	(phafi-root-dir) ";"
+			"autofocus miniversion"
+			))
+  )
+
+
 (defun phafi-autofocus-digital (folder)
   (interactive (list (read-string "Folder name: ")))
   (async-shell-command (concat