 		     (concat "cat " temp-file "|")))
 		  (t (throw 'sk/command "invalid source type")))))
     (let ((output-file (make-temp-file "sk")))
-      `((command . ,(concat prefix sk/executable " " optstr " > " output-file))
+      `((command . ,(concat prefix sk/executable " " sk/args " " optstr " > " output-file))
 	(output-file . ,output-file)))))
 
 

(defun sk ()
  "Starts a sk session."
  (interactive)
  (let ((args "")
	(default-directory (condition-case err
			       (projectile-project-root)
			     (error
			      default-directory))))

  :type 'string
  :group 'sk)

(defcustom sk/args "--color 16 --margin 1,1,0,0"
  "Additional arguments to pass into sk."
  :type 'string
  :group 'sk)
