Permalink
Browse files

got rid of column-grid stuff

  • Loading branch information...
1 parent e69a80c commit 59eb815949abb4612994d17d37a74055faa5b705 @tavisrudd committed Sep 1, 2012
Showing with 3 additions and 41 deletions.
  1. +3 −41 dss-codenav-helpers.el
@@ -167,7 +167,9 @@ Do nothing if not in string."
(interactive)
(save-excursion
(dss/out-sexp)
- (forward-to-word 2)
+ (forward-to-word 1)
+ (forward-sexp)
+ (skip-chars-forward " ")
(mark-sexp 1)
(let ((defun-name (buffer-substring (region-beginning) (region-end))))
(if defun-name
@@ -314,46 +316,6 @@ Comes from http://github.com/technomancy/emacs-starter-kit/blob/master/starter-k
(setq imenu-auto-rescan t)
-(require 'column-marker)
-(defvar dss/major-column-face 'dss/major-column-face
- "major column grid marker")
-(defface dss/major-column-face '((t (:background "#484848")))
- "major column grid marker"
- :group 'faces)
-
-(defvar dss/minor-column-face 'dss/minor-column-face
- "minor column grid marker")
-(defface dss/minor-column-face '((t (:background "#2c2c2c")))
- "minor column grid marker"
- :group 'faces)
-
-(column-marker-create dss/column-marker-1 dss/minor-column-face)
-(column-marker-create dss/column-marker-2 dss/major-column-face)
-(column-marker-create dss/column-marker-3 dss/minor-column-face)
-(column-marker-create dss/column-marker-4 dss/major-column-face)
-(column-marker-create dss/column-marker-5 dss/minor-column-face)
-(column-marker-create dss/column-marker-6 dss/major-column-face)
-(column-marker-create dss/column-marker-7 dss/minor-column-face)
-(column-marker-create dss/column-marker-8 dss/major-column-face)
-
-(defun dss/column-grid ()
- (interactive)
- ;; col-highlight-face
- (hl-line-mode -1)
- (dss/column-marker-1 10)
- (dss/column-marker-2 20)
- (dss/column-marker-3 30)
- (dss/column-marker-4 40)
- (dss/column-marker-5 50)
- (dss/column-marker-6 60)
- (dss/column-marker-7 70)
- (dss/column-marker-8 80))
-
-(defun dss/column-grid-off ()
- (interactive)
- (dss/column-marker-1 -1)
- (hl-line-mode t))
-
(defun dss/line-jump (n)
(interactive "nLine: ")
(dss/goto-line n)

0 comments on commit 59eb815

Please sign in to comment.