From: rearman <rearman@r717.net>
Date: Wed, 2 Nov 2022 12:57:46 +0000 (-0400)
Subject: Credit to Xah, removed goto-line-with-feedback - no longer needed.
X-Git-Url: https://git.earman.xyz/?a=commitdiff_plain;h=c44b22b3bbc48cfd66f564bd6b71a9f9f1442c46;p=emacsinit.git

Credit to Xah, removed goto-line-with-feedback - no longer needed.
---

diff --git a/.gitignore b/.gitignore
index 6cca39d..835495d 100644
--- a/.gitignore
+++ b/.gitignore
@@ -7,4 +7,5 @@ straight/
 transient/
 url/
 ido.last
-recentf
\ No newline at end of file
+recentf
+work-eqs.el
\ No newline at end of file
diff --git a/init.el b/init.el
index e377d74..a617ac7 100644
--- a/init.el
+++ b/init.el
@@ -97,18 +97,6 @@
 	      cursor-type 'bar)
 
 ;; DEFUNS
-(defun goto-line-with-feedback ()
-  "Show line numbers, go to selected line, turn off line numbers.
-If line numbers were already on, leave them on."
-  (interactive)
-  (unwind-protect
-      (if (eq t display-line-numbers-mode)
-	  (goto-line (read-number "Goto Line: "))
-	(progn
-	  (display-line-numbers-mode 1)
-	  (goto-line (read-number "Goto Line: "))
-	  (display-line-numbers-mode -1)))))
-
 (defun open-line-below ()
   "Creates a new empty line below the current line."
   (interactive)
@@ -143,7 +131,7 @@ Can't go prev line first, edge case of beginning of buffer."
   (join-line 0))
 
 (defun new-empty-buffer ()
-  "Create a new empty buffer."
+  "Create a new empty buffer.  Stolen from Xah."
   (interactive)
   (let ((newbuf (generate-new-buffer "untitled")))
     (switch-to-buffer newbuf)
@@ -193,9 +181,7 @@ Can't go prev line first, edge case of beginning of buffer."
 (global-set-key (kbd "C-c h") 'global-hl-line-mode)
 (global-set-key (kbd "C-c n") 'display-line-numbers-mode)
 (global-set-key (kbd "C-c r") 'recentf-open-files)
-
 ;; OVERRIDES
-(global-set-key [remap goto-line] 'goto-line-with-feedback)
 (global-set-key (kbd "M-j") 'backward-join-line)
 (global-set-key (kbd "M-J") 'join-line)
 (global-set-key (kbd "C-o") 'open-line-below)
@@ -217,7 +203,7 @@ Can't go prev line first, edge case of beginning of buffer."
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
- '(minibuffer-prompt-properties '(read-only t cursor-intangible t face minibuffer-prompt))
+ '(minibuffer-prompt-properties '(read-only t cursor-intangible t face minibuffer-prompt)) ;; Stolen from Xah
  )
 (custom-set-faces
  ;; custom-set-faces was added by Custom.