     (setq recentf-auto-cleanup 'never
 	  recentf-max-saved-items 100)
     (recentf-mode 1)))
+
+(add-to-list 'recentf-exclude
+             (expand-file-name "~/.emacs.d/elpa"))
 
 (defun uniquify-all-lines-region (start end)
   "Find duplicate lines in region START to END keeping first occurrence."

;; from https://matthewbauer.us/bauer/#install and
;; http://bling.github.io/blog/2016/01/18/why-are-you-changing-gc-cons-threshold/
(setq gc-cons-threshold

  :config (progn
	    (setq rust-format-on-save t)))

(unless (fboundp 'xref-push-marker-stack)
  (defalias 'xref-pop-marker-stack 'pop-tag-mark)

  (defun xref-push-marker-stack (&optional m)
    "Add point to the marker stack."
    (ring-insert find-tag-marker-ring (or m (point-marker)))))

(defadvice gdb-inferior-filter
    (around gdb-inferior-filter-without-stealing)
