Provide `mldrag' for compatibility.

(mldrag-drag-mode-line, mldrag-drag-vertical-line): New aliases,
marked obsolete.

diff --git a/lisp/mouse.el b/lisp/mouse.el
index f535d716596b517051519a42207144375b106f00..8615a4d65de95023d7592a4c1894f572d848540c 100644 (file)
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -2026,4 +2026,11 @@ and selects that window."
 
 (provide 'mouse)
 
+;; This file contains the functionality of the old mldrag.el.
+(defalias 'mldrag-drag-mode-line 'mouse-drag-mode-line)
+(defalias 'mldrag-drag-vertical-line 'mouse-drag-vertical-line)
+(make-obsolete 'mldrag-drag-mode-line 'mouse-drag-mode-line)
+(make-obsolete 'mldrag-drag-vertical-line 'mouse-drag-vertical-line)
+(provide 'mldrag)
+
 ;;; mouse.el ends here