(puthash key val diff-hl-spec-cache)))\r
val))\r
\r
-(defun diff-hl-fringe-bmp-from-pos (type pos)\r
+(defun diff-hl-fringe-bmp-from-pos (_type pos)\r
(intern (format "diff-hl-bmp-%s" pos)))\r
\r
-(defun diff-hl-fringe-bmp-from-type (type pos)\r
+(defun diff-hl-fringe-bmp-from-type (type _pos)\r
(if (eq type 'unknown)\r
'question-mark\r
(intern (format "diff-hl-bmp-%s" type))))\r
\r
+(defvar vc-svn-diff-switches)\r
+\r
(defmacro diff-hl-with-diff-switches (body)\r
`(let ((vc-git-diff-switches nil)\r
(vc-hg-diff-switches nil)\r