From e4ed5326c78f44ae5685fe627e916dc0dc8ebfb9 Mon Sep 17 00:00:00 2001 From: morioka Date: Fri, 10 Apr 1998 00:37:11 +0000 Subject: [PATCH] (eliminate-top-spaces): Moved from semi-def.el. --- mime-def.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/mime-def.el b/mime-def.el index 3dc6d92..dfbeece 100644 --- a/mime-def.el +++ b/mime-def.el @@ -50,6 +50,12 @@ x)))) ) +(defsubst eliminate-top-spaces (string) + "Eliminate top sequence of space or tab in STRING." + (if (string-match "^[ \t]+" string) + (substring string (match-end 0)) + string)) + ;;; @ definitions about MIME ;;; -- 1.7.10.4