Commits

Anonymous committed 1825d53

Removed unused functions from defuns-edit & their bindings

Comments (0)

Files changed (2)

files/defuns-edit.el

       (skip-syntax-backward " "))
     (delete-region old-point (point))))
 
-;; line selection functions
-(defun line-select ()
-  "Set the active region to current line"
-  (interactive)
-  (back-to-indentation)
-  (set-mark (point))
-  (end-of-line))
-
-(defun beginning-of-line-select ()
-  "Set the active region from beginning of current line to the point"
-  (interactive)
-  (set-mark (point))
-  (back-to-indentation))
-
-(defun end-of-line-select ()
-  "Set the active region from point to the end of current line"
-  (interactive)
-  (set-mark (point))
-  (end-of-line))
-
 ;; TODO: if inside a comment, on enter should continue with comment
 ;; (call indent-new-comment-line was M-j)... or is this really useful?
 (defun open-next-line ()
   (interactive)
   (goto-char (region-end)))
 
-(defun backward-up-list+ ()
-  "Same as `backward-up-list', but can also move out from withing a string"
-  (interactive)
-  (if (in-string-p)
-      (while (in-string-p)
-        (backward-char))
-    (backward-up-list)))
-
-(defun up-list+ ()
-  "Same as `up-list', but can also move out from withing a string"
-  (interactive)
-  (if (in-string-p)
-      (while (in-string-p)
-        (forward-char))
-    (up-list)))
-
-(defun copy-line ()
-  "Copy line (from point to end) to the kill ring but restore it afterwards"
-  (interactive)
-  (save-excursion
-    (let ((x (point)))
-      (kill-line)
-      (yank)
-      (goto-char x))))
-
 ;; from https://github.com/skeeto/.emacs.d/blob/master/my-funcs.el
 (defun move-line (n)
   "Move the current line up or down by N lines."
 
 ;; # move into
 (global-set-key (kbd "C-M-d") 'down-list)
-(global-set-key (kbd "C-M-e") 'up-list+)
-(global-set-key (kbd "C-M-u") 'backward-up-list+)
 
-;; line selection
-(global-set-key (kbd "H-a") 'beginning-of-line-select)
-(global-set-key (kbd "H-e") 'end-of-line-select)
-(global-set-key (kbd "H-s") 'line-select)
-
-(global-set-key (kbd "H-w") 'copy-line)
 (global-set-key (kbd "C-c <up>") 'copy-previous-line)
 (global-set-key (kbd "C-c <down>") 'copy-next-line)
 (global-set-key (kbd "M-<up>") 'move-line-up)
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.