(defun plomvi-paste-forward ()
   "Paste last kill rightwards in current line, or (if kill ends in \n) under it.
 
+Doesn't move rightwards before yanking if at end of buffer.
+
 Note that this ignores killed rectangles."
   (interactive)
   (if (eq nil (string-match "\n$" (current-kill 0)))
       (progn
-        (right-char)
+        (if (< (point) (point-max))
+            (right-char))
         (yank))
     (end-of-line)
-    (right-char)
+    (if (< (point) (point-max))
+        (right-char))
     (yank)
     (previous-line)))