Begun work on clean byte compilation / clarifying interfaces.

1 files changed, 4 insertions, 4 deletions

diff --git a/generic/span-extent.el b/generic/span-extent.el
index 91ad6ac9..db1a70cd 100644
--- a/generic/span-extent.el
+++ b/generic/span-extent.el
@@ -31,6 +31,10 @@
   "Set the end point of SPAN to VALUE."
   (set-extent-endpoints span (extent-start-position span) value))
 
+(defsubst set-span-property (span name value)
+  "Set SPAN's property NAME to VALUE."
+  (set-extent-property span name value))
+
 (defsubst span-read-only (span)
   "Set SPAN to be read only."
   (set-span-property span 'read-only t))
@@ -43,10 +47,6 @@
   "Return SPAN's value for property PROPERTY."
   (extent-property span name))
 
-(defsubst set-span-property (span name value)
-  "Set SPAN's property NAME to VALUE."
-  (set-extent-property span name value))
-
 (defsubst delete-span (span)
   "Delete SPAN."
   (delete-extent span))