   (let ((cur-workspace
          (hong/find-file-in-dir
           hong/workspace-directory
-          (hong//build-find-command nil nil nil
-                                    '("*/.*" "*/elpa*")))))
-    (find-file
-     (hong/find-file-in-dir
-      (list cur-workspace)
-      (hong//build-find-command t nil nil
-                                '("*/.*"))))
-    )
-  )
+          (hong//build-find-command nil nil nil '("*/.*" "*/elpa*")))))
+    (find-file (hong/find-file-in-dir
+                (list cur-workspace)
+                (hong//build-find-command t nil nil '("*/.*"))))
+    ))
 
 (defun hong/open-recentf-file ()
   (interactive)
   (unless recentf-mode
     (recentf-mode 1))
-  (find-file
-   (completing-read "Find recentf files: "
-                        recentf-list))
-  )
+  (find-file (completing-read "Find recentf files: " recentf-list)))
 
 ;;; need ffip
 (defun hong/close-project-file ()

  (delete-process
   (get-process
    (completing-read "Kill Process: "
                         (delete-if (lambda (str) (equal (substring str 0 6) "server"))
                                    (mapcar #'process-name (process-list)))
                         ))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; my open files function

          (mapc (lambda (buf-name) (kill-buffer (get-file-buffer buf-name)))
                project-files)
          (message (format "Kill Buffer %d" project-file-count)))
        ))))

(defhydra hydra-open-files-menu (:color pink
                                        :pre (message "Please input command")
