X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fsimple.el;h=763a8978ad55d38c65c5d3ee4a176feb09d3a3aa;hb=05f75a702ab605f020299ac5845c79ee6046e2fe;hp=36566d4cb651f3bcca9abf2a5916f78c7e644b8d;hpb=042cabb13b0419d8aa5cfac9e087d78730d1dbc7;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/simple.el b/lisp/simple.el
index 36566d4..763a897 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -298,6 +298,8 @@ With argument, join this line to following line."
 	    (delete-region (point) (+ (point) (length fill-prefix))))
 	(fixup-whitespace))))
 
+(defalias 'join-line 'delete-indentation)
+
 (defun fixup-whitespace ()
   "Fixup white space between objects around point.
 Leave one space or none, according to the context."