WIP: Address unused lexical warnings

c.el

@@ -64,7 +64,7 @@ This is the value of `next-error-function' in CScope buffers."
         (goto-char (point-min))))
 
     (let ((do-next (> n 0)))
-      (dotimes (i (abs n))
+      (dotimes (_ (abs n))
 	(cscope-buffer-search t do-next)))))
 (defadvice cscope-call (before my-cscope-call)
   "Wrapper to make sure `next-error-function' is set."

compilation.el

@@ -4,8 +4,8 @@
 (hook-mode occur-mode-hook
   next-error-follow-minor-mode)
 
-(defun road-runner (&rest args)
+(defun road-runner (&rest _)
   "BEEP! BEEP!"
-  (dotimes (i 2)
+  (dotimes (_ 2)
     (beep) (sleep-for 0.2)))
 (add-hook 'compilation-finish-functions 'road-runner)

emacs.el

@@ -5,21 +5,21 @@
   ;; If this triggers, make sure to install the `bar-cursor' package
   ;; from melpa unstable.
   (display-warning 'emacs "SETUP ISSUE: bar-cursor package is not installed.")
-  (defun bar-cursor-mode (&optional arg)
+  (defun bar-cursor-mode (&optional _)
     ;; Do nothing -- stub
     ))
 (unless (fboundp 'global-form-feed-st-mode)
   ;; If this triggers, make sure to install the `form-feed-st' package
   ;; from melpa unstable.
   (display-warning 'emacs "SETUP ISSUE: form-feed-st package is not installed.")
-  (defun global-form-feed-st-mode (&optional arg)
+  (defun global-form-feed-st-mode (&optional _)
     ;; Do nothing -- stub
     ))
 (unless (fboundp 'global-window-tool-bar-mode)
   ;; If this triggers, make sure to install the `window-tool-bar'
   ;; package from GitHub.
   (display-warning 'emacs "SETUP ISSUE: window-tool-bar package is not installed.")
-  (defun global-window-tool-bar-mode (&optional arg)
+  (defun global-window-tool-bar-mode (&optional _)
     ;; Do nothing -- stub
     ))
 
@@ -92,7 +92,7 @@
     (setq xterm-extra-capabilities '(setSelection))
 
     ;; Use the default Windows browser.
-    (setq browse-url-browser-function (lambda (url &rest args)
+    (setq browse-url-browser-function (lambda (url &rest _)
                                         (call-process "explorer.exe" nil nil nil url)))))
 
 ;; Make Emacs display similar to modern editors.
@@ -213,7 +213,7 @@
 ;;; Custom commands:
 
 ;;; DWIM <home> and <end> TODO(package)
-(defun beginning-of-line-dwim (&optional n)
+(defun beginning-of-line-dwim (&optional _)
   "Move point to the first non-whitespace character or the beginning of line."
   (interactive "^p")