diff --git a/.emacs b/.emacs
index 53391f3962aeb6cae3c9c904f586d3cece4fbcfb..560ddc9521197e22dce5992e8c561aa1267d9cb9 100644
--- a/.emacs
+++ b/.emacs
@@ -1079,7 +1079,7 @@
 (defvar scissors ">8 --------------------------------------------------------------- 8<"
 "String to insert in \\[scissors].")
 (defun scissors()
-  "Insert a line of SCISSORS in the buffer"
+  "Insert a line of SCISSORS in the buffer."
   (interactive)
   (insert scissors)
   (forward-line 1))
@@ -1087,8 +1087,9 @@
 
 (defun snip-lines-mail ()
   "Delete all lines except the first three in the current buffer selection.
-For the first and last remaining lines, remove all characters after the prefix composed of spaces and '>'.
-For the middle line, remove all characters after the prefix and insert '[snip]' after the remaining prefix."
+For the first and last remaining lines, remove all characters after the prefix
+composed of spaces and '>'.  For the middle line, remove all characters after
+the prefix and insert '[snip]' after the remaining prefix."
   (interactive)
   (save-excursion
     (let ((begin (region-beginning))