fixing linting

expenses.el

@@ -501,8 +501,6 @@ Optional argument USER for user name."
  (let* ((user (completing-read "Select user: " (expenses-users)))
  (date (org-read-date nil nil nil "Date: "))
  (categories (expenses--ask-for-categories))
- (month (format-time-string "%B" (org-time-string-to-seconds date)))
- (year (format-time-string "%Y" (org-time-string-to-seconds date)))
  (expenses (cl-loop for category in categories
  collect (expenses--get-expense-for-month-filtered-by-categories date category user)))
  (sorted-expenses-category-list)
@@ -613,9 +611,9 @@ Optional argument USER for user name."
  (setq total-string (format "%s = %10s" (propertize "Total" 'face 'expenses-face-message) (propertize (number-to-string total) 'face 'expenses-face-expense)))
  (insert total-string)
  (align-regexp (point-min) (point-max) "\\(\\s-*\\)=")
- (goto-line 4)
+ (forward-line 4)
  (align-regexp (point-min) (point) "\\(\\s-*\\):")
- (end-of-buffer)
+ (goto-char (point-max))
  (read-only-mode)
  (message total-string)
  (switch-to-buffer-other-window buffer-name))))