From 4ecc3596e248a9c39fa3aec5d4b98cb68e0f197b Mon Sep 17 00:00:00 2001
From: "macoymadson@gmail.com" <macoymadson@gmail.com>
Date: Tue, 4 Dec 2018 15:12:14 -0800
Subject: [PATCH] No more slow scroll

I had to disable the fancy smooth scrolling because it makes next-line
go obscenely slow, which gets unusable with multiple-cursors.
I also made some small modifications to get rid of work stuff.
---
 Emacs/dotEmacs.el     | 12 +++++++++---
 Emacs/search.el       |  2 +-
 Emacs/syntaxes.el     |  2 +-
 Emacs/visual-early.el | 18 +++++++++++-------
 4 files changed, 22 insertions(+), 12 deletions(-)

diff --git a/Emacs/dotEmacs.el b/Emacs/dotEmacs.el
index 51a4365..973cd19 100644
--- a/Emacs/dotEmacs.el
+++ b/Emacs/dotEmacs.el
@@ -102,6 +102,12 @@
 ;; - Treacherous: vc-annotate uses the revision which the buffer has, which if you commit from DSVN
 ;;   does not update (i.e. look at the mode line revision). You need to revert the buffer then do vc-annotate to see the true state
 ;; - Isearch: Customize colors
+;; - Search Everything/projectile-find-files which will work on non-vc dirs
+;; - Code reference to org: mark block of code, run command; command copies string to clipboard with file:line org link and code block. Good for deep dives where you have to take notes
+;;
+;; Split todo
+;; - Put all things which are user-specific at the top of respective files
+;; - Search: Make Codesearch data folder user-specific
 ;;;;
 ;; Criticism improvements:
 ;; - [DONE] Select word at point
@@ -268,9 +274,9 @@ static char *gnus-pointer[] = {
  '(linum-format " %7i ")
  '(org-support-shift-select t)
  '(package-archives
-   '(("marmalade" . "https://marmalade-repo.org/packages/")
-	 ("gnu" . "http://elpa.gnu.org/packages/")
-	 ("melpa" . "http://melpa.org/packages/")))
+   (quote
+	(("gnu" . "http://elpa.gnu.org/packages/")
+	 ("melpa" . "http://melpa.org/packages/"))))
  '(package-selected-packages
    '(web-mode rainbow-mode ivy-xref expand-region ivy engine-mode diminish iy-go-to-char magit dsvn delight adaptive-wrap web-beautify etags-select simpleclip yasnippet swiper company auto-complete clang-format avy ag xah-find flx-ido ido-vertical-mode sublime-themes smooth-scrolling alect-themes base16-theme powerline darktooth-theme projectile smex fiplr helm-dash better-defaults multiple-cursors zenburn-theme marmalade-demo))
  '(pos-tip-background-color "#36473A")
diff --git a/Emacs/search.el b/Emacs/search.el
index 1da40ac..449bcd7 100644
--- a/Emacs/search.el
+++ b/Emacs/search.el
@@ -212,7 +212,7 @@ If there's a string at point, offer that as a default."
 ;; The filter which will apply to codesearch results. Things matching this regex will be removed.
 ;; This is useful for e.g. filtering autogenerated code files
 ;; Note that this will also remove code lines which match this pattern, so make the regex robust to that
-(setq macoy-codesearch-ignore-lines-pattern "_ast\.|_autogen|\.wiki")
+(setq macoy-codesearch-ignore-lines-pattern "_ast\.|_autogen")
 
 (defun macoy-codesearch-search-with-filter-directory (pattern directory)
   (interactive
diff --git a/Emacs/syntaxes.el b/Emacs/syntaxes.el
index 5b80404..efe9048 100644
--- a/Emacs/syntaxes.el
+++ b/Emacs/syntaxes.el
@@ -50,7 +50,7 @@
 	)
 
   ;; Files to use this mode
-  '(".Layer\\'")
+  '(".ExampleExtension\\'")
   
   ;; Function list
   nil
diff --git a/Emacs/visual-early.el b/Emacs/visual-early.el
index 25e37f8..e74aae0 100644
--- a/Emacs/visual-early.el
+++ b/Emacs/visual-early.el
@@ -28,16 +28,20 @@
 
 ;; Scrolling
 ;; https://www.emacswiki.org/emacs/SmoothScrolling
-;; scroll one line at a time (less "jumpy" than defaults)
 (setq mouse-wheel-scroll-amount '(2 ((shift) . 2))) ;; Two lines at a time    
 (setq mouse-wheel-progressive-speed nil) ;; don't accelerate scrolling
-;; (setq mouse-wheel-follow-mouse 't) ;; scroll window under mouse
-;;(setq scroll-step 1) ;; keyboard scroll one line at a time
-;; (setq scroll-conservatively 10000)
-;; (setq auto-window-vscroll nil)
 
-(require 'smooth-scrolling)
-(smooth-scrolling-mode 1)
+;; When the cursor scrolls off the screen, this makes the window scroll by a dozen or so lines
+;;  instead of jumping to the top of the window
+;; Disabled because of poor performance
+;; (require 'smooth-scrolling)
+;; (smooth-scrolling-mode 0)
+
+;; Make scrolling less jumpy
+(setq scroll-step 1)
+(setq scroll-conservatively 10000)
+;; This causes next-line to be ridiculously slow when turned on, so I've disabled it
+(setq auto-window-vscroll nil)
 
 ;;
 ;; Powerline: nicer status bar