From a536021fef6602f3e10a8fa7429710facf3de1d7 Mon Sep 17 00:00:00 2001
From: chiles <chiles>
Date: Tue, 30 Jul 1991 10:26:04 +0000
Subject: [PATCH] Removed bindings from this file and put them in
 bindings.lisp.

---
 hemlock/netnews.lisp | 57 --------------------------------------------
 1 file changed, 57 deletions(-)

diff --git a/hemlock/netnews.lisp b/hemlock/netnews.lisp
index 8adaa35bb..9ebe77252 100644
--- a/hemlock/netnews.lisp
+++ b/hemlock/netnews.lisp
@@ -2304,60 +2304,3 @@
 (defun nntp-post (stream)
   (write-nntp-command "post" stream :post))
 
-(bind-key "Netnews Show Article" #k"space" :mode "News-Headers")
-(bind-key "Netnews Next Article" #k"n" :mode "News-Headers")
-(bind-key "Netnews Previous Article" #k"p" :mode "News-Headers")
-(bind-key "Netnews Previous Line" #k"Uparrow" :mode "News-Headers")
-(bind-key "Netnews Previous Line" #k"C-p" :mode "News-Headers")
-(bind-key "Netnews Next Line" #k"Downarrow" :mode "News-Headers")
-(bind-key "Netnews Next Line" #k"C-n" :mode "News-Headers")
-(bind-key "Netnews Headers Scroll Window Down" #k"c-v" :mode "News-Headers")
-(bind-key "Netnews Headers Scroll Window Up" #k"m-v" :mode "News-Headers")
-(bind-key "Netnews Next Article" #k"n" :mode "News-Message")
-(bind-key "Netnews Previous Article" #k"p" :mode "News-Message")
-(bind-key "Netnews Message Scroll Down"  #k"space" :mode "News-Message")
-(bind-key "Scroll Window Up" #k"backspace" :mode "News-Message")
-(bind-key "Netnews Message Select Headers Buffer" #k"hyper-h"
-	  :mode "News-Message")
-(bind-key "Netnews Message Select Headers Buffer" #k"^" :mode "News-Message")
-(bind-key "Netnews Message Keep Buffer" #k"k" :mode "News-Message")
-(bind-key "Netnews Select Message Buffer" #k"hyper-m" :mode "News-Headers")
-(bind-key "Netnews Select Message Buffer" #k"hyper-m" :mode "Post")
-(bind-key "Netnews Exit" #k"q" :mode "News-Headers")
-(bind-key "Netnews Message Punt" #k"q" :mode "News-Message")
-(bind-key "Netnews Go to Next Group" #k"g" :mode "News-Headers")
-(bind-key "Netnews Go to Next Group" #k"g" :mode "News-Message")
-(bind-key "Netnews Headers File Message" #k"o" :mode "News-Headers")
-(bind-key "Netnews Message File Message" #k"o" :mode "News-Message")
-(bind-key "List All Newsgroups" #k"l" :mode "News-Headers")
-(bind-key "List All Newsgroups" #k"l" :mode "News-Message")
-(bind-key "Netnews Append to File" #k"a" :mode "News-Headers")
-(bind-key "Netnews Append to File" #k"a" :mode "News-Message")
-(bind-key "Netnews Post Message" #k"s" :mode "News-Headers")
-(bind-key "Netnews Post Message" #k"s" :mode "News-Message")
-(bind-key "Netnews Reply to Message" #k"r" :mode "News-Headers")
-(bind-key "Netnews Reply to Message in Other Window" #k"r"
-	  :mode "News-Message")
-(bind-key "netnews Reply to Message in Other Window" #k"R"
-	  :mode "News-Headers")
-(bind-key "Netnews Reply via Mail" #k"m" :mode "News-Headers") ; 
-(bind-key "Netnews Reply via Mail" #k"m" :mode "News-Message")
-(bind-key "Netnews Forward Message" #k"f" :mode "News-Message")
-(bind-key "Netnews Forward Message" #k"f" :mode "News-Headers")
-(bind-key "Netnews Deliver Post" #k"hyper-s" :mode "Post")
-(bind-key "Netnews Message Select Post Buffer" #k"hyper-p"
-	  :mode "News-Message")
-(bind-key "Netnews Message Select Draft Buffer" #k"hyper-d"
-	  :mode "News-Message")
-(bind-key "Netnews Abort Post" #k"hyper-q" :mode "Post")
-(bind-key "Insert Message Buffer" #k"Hyper-y" :mode "Post")
-(bind-key "Insert Message Region" #k"Hyper-y" :mode "News-Message")
-(bind-key "Netnews Punt Headers" #k"Hyper-p" :mode "News-Headers")
-
-
-(bind-key "Netnews Quit Browse" #k"q" :mode "News-Browse")
-(bind-key "Netnews Browse Add Newsgroup To File" #k"a"
-	  :mode "News-Browse")
-(bind-key "Netnews Browse Read Group" #k"space" :mode "News-Browse")
-(bind-key "Next Line" #k"n" :mode "News-Browse")
-(bind-key "Previous Line" #k"p" :mode "News-Browse")
-- 
GitLab