Better abbrevs

diff --git a/sotlisp.el b/sotlisp.el
index 4b885033993c7c43db3d9653fe5f1cfa3ee4f247..429499b883daaa5cb2cf5a1c1d7f4d7b2a9525b8 100644 (file)
--- a/sotlisp.el
+++ b/sotlisp.el
@@ -243,6 +243,7 @@ The space char is not included.  Any \"$\" are also removed."
     ("k" . "kbd \"$\"")\r
     ("kb" . "kill-buffer")\r
     ("kn" . "kill-new ")\r
+    ("kp" . "keywordp ")\r
     ("l" . "lambda ($)")\r
     ("la" . "looking-at \"$\"")\r
     ("lap" . "looking-at-p \"$\"")\r
@@ -286,8 +287,8 @@ The space char is not included.  Any \"$\" are also removed."
     ("s" . "setq ")\r
     ("sb" . "search-backward $ nil 'noerror")\r
     ("sbr" . "search-backward-regexp $ nil 'noerror")\r
-    ("scb" . "skip-chars-backward \"$\r\n[:blank:]\"")\r
-    ("scf" . "skip-chars-forward \"$\r\n[:blank:]\"")\r
+    ("scb" . "skip-chars-backward \"$\\r\\n[:blank:]\"")\r
+    ("scf" . "skip-chars-forward \"$\\r\\n[:blank:]\"")\r
     ("se" . "save-excursion")\r
     ("sf" . "search-forward $ nil 'noerror")\r
     ("sfr" . "search-forward-regexp $ nil 'noerror")\r