New customer variable spacemacs-delete-current-buffer-file-arbitrary

* layers/+spacemacs/spacemacs-defaults/funcs.el:
New customer variable spacemacs-delete-current-buffer-file-arbitrary
to delete current buffer and file with/without confirmation.

Author: sunlin7

layers/+spacemacs/spacemacs-defaults/funcs.el

@@ -570,6 +570,11 @@ FILENAME is deleted using `spacemacs/delete-file' function.."
   (funcall-interactively #'spacemacs/delete-file filename t))
 
 ;; from magnars
+(defcustom spacemacs-delete-current-buffer-file-arbitrary nil
+  "User deletes current buffer and file without confirmation."
+  :type 'boolean
+  :group 'spacemacs)
+
 (defun spacemacs/delete-current-buffer-file (&optional arg)
   "Removes file connected to current buffer and kills buffer.
 If ARG is not nil, assume yes for default."
@@ -594,7 +599,11 @@ If ARG is not nil, assume yes for default."
 (defun spacemacs/delete-current-buffer-file-yes ()
   "Removes file connected to current buffer and kills buffer with assume yes."
   (interactive)
-  (funcall #'spacemacs/delete-current-buffer-file t))
+  (funcall #'spacemacs/delete-current-buffer-file
+           spacemacs-delete-current-buffer-file-arbitrary)
+  (unless spacemacs-delete-current-buffer-file-arbitrary
+    (message "Customer the `spacemacs-delete-current-buffer-file-arbitrary' \
+to delete buffer and file without confirmation.")))
 
 ;; from magnars
 (defun spacemacs/sudo-edit (&optional arg)