 ;; New browser tab.
 (cond
  ((string-equal system-type "darwin") ; Mac OS X
-    (defun ar/new-browser-tab ()
-      "Open a new browser tab in the default browser."
-      (interactive)
-      (shell-command "open http://google.com"))
-    ;; Ensures PATH is loaded from shell.
-    (use-package exec-path-from-shell
-      :ensure exec-path-from-shell)
-    (exec-path-from-shell-initialize))
+  (defun ar/new-browser-tab ()
+    "Open a new browser tab in the default browser."
+    (interactive)
+    (shell-command "open http://google.com"))
+  ;; Ensures PATH is loaded from shell.
+  (use-package exec-path-from-shell
+    :ensure exec-path-from-shell)
+  (exec-path-from-shell-initialize))
  ((string-equal system-type "gnu/linux") ; Linux
-    (defun ar/new-browser-tab ()
-      "Open a new browser tab in the default browser."
-      (interactive)
-      (shell-command "google-chrome http://google.com")
-      ))
- )
+  (defun ar/new-browser-tab ()
+    "Open a new browser tab in the default browser."
+    (interactive)
+    (shell-command "google-chrome http://google.com")
+    )))
 (global-set-key (kbd "C-x t") 'ar/new-browser-tab)
 
 ;; Disable backup.
 ;; From: http://anirudhsasikumar.net/blog/2005.01.21.html
 (setq backup-inhibited t)
-; Disable auto save.
+
+;; Disable auto save.
 (setq auto-save-default nil)
 
 ;; Disable auto save.

 '("\\.git$" "\\.hg$" "\\.svn$" "\\.CVS$" "\\._darcs$" "\\.la$" "\\.o$" "\\.i$") ; do not show these files in helm buffer
 helm-ff-file-name-history-use-recentf t
 helm-move-to-line-cycle-in-source t ; move to end or beginning of source
                                        ; when reaching top or bottom of source.
 ido-use-virtual-buffers t      ; Needed in helm-buffers-list
 helm-buffers-fuzzy-matching t          ; fuzzy matching buffer names when non--nil
                                        ; useful in helm-mini that lists buffers
 )

;; Save current position to mark ring when jumping to a different place
(add-hook 'helm-goto-line-before-hook 'helm-save-current-pos-to-mark-ring)

             (set-visited-file-name newname)
             (set-buffer-modified-p nil) t))))

;;  http://scottmcpeak.com/elisp/scott.emacs.el
;;  ------------------- yes-or-no-p ---------------------
;;  There are a number of situations where Emacs wants to ask me a question,
;;  but the answer is always the same (or, it's easy to get the effect of
;;  the other answer afterwards).  The main example is the question:
;;
;;    File foo.txt has changed on disk.  Reread from disk?
;;
;;  This question is annoying because it gets asked while I'm moving around
;;  in a debugger stack trace, and often don't care about the file I happen
;;  to be at (because I want to move past that frame anyway).  Moreover,
;;  my F12 binding lets me re-read files with a single keystroke, so if I
;;  actually *do* want to re-read it's easy to do.

;;  First, I need the original definition of yes-or-no-p so I can call it
;;  after I've replaced its definition.  In case .emacs gets re-read
;;  after startup, avoid losing the original definition.
(if (fboundp 'orig-yes-or-no-p)
    nil        ; it's already bound, don't re-bind
  (fset 'orig-yes-or-no-p (symbol-function 'yes-or-no-p)))

;;  Now, define my version in terms of `orig-yes-or-no-p'.
(defun yes-or-no-p (prompt)
  "Ask user a yes-or-no question.  Return t if answer is yes, nil if no.
This is a wrapper around `orig-yes-or-no'."
  (if (string-match
;;  This message is created in lisp/files.el, and there are four
;;  variations.  I'm intentionally matching two of them.
       "File .* changed on disk.  Reread from disk"
       prompt)

;;  it's that question; the answer is no, but I *do* want to know
;;  that it has changed
      (progn (message "Note: File has changed on disk.") nil)

;;  it's a different question; for now, just ask me; I'll probably
;;  add more patterns to the above as I think of other questions that
;;  I don't want asked
    (orig-yes-or-no-p prompt)
    ))

(use-package git-link
  :ensure git-link)
