(mime-entity-number): New function (moved from SEMI layer).

diff --git a/mime-def.el b/mime-def.el
index 915dba1..8db35e4 100644 (file)
--- a/mime-def.el
+++ b/mime-def.el
@@ -142,6 +142,9 @@
 (defsubst mime-entity-encoding (entity)            (aref entity 8))
 (defsubst mime-entity-children (entity)            (aref entity 9))
 
+(defsubst mime-entity-number (entity)
+  (reverse (mime-entity-node-id entity)))
+
 
 ;;; @ utility
 ;;;