# HG changeset patch # User Karl Heuer # Date 795904732 0 # Node ID c20013843cb15c37cee0576d4d564d48dcdfa20c # Parent c968d4c026b7f961748e0dce5c6196f5d28f0704 Translate concat to ml-concat. diff -r c968d4c026b7 -r c20013843cb1 lisp/emulation/mlconvert.el --- a/lisp/emulation/mlconvert.el Wed Mar 22 19:42:05 1995 +0000 +++ b/lisp/emulation/mlconvert.el Wed Mar 22 20:38:52 1995 +0000 @@ -194,6 +194,7 @@ (ml-expansion 'get-tty-no-blanks-input "read-no-blanks-input") (ml-expansion 'get-tty-key "read-key") +(ml-expansion 'concat "ml-concat") (ml-expansion 'c= "char-equal") (ml-expansion 'goto-character "goto-char") (ml-expansion 'substr "ml-substr")