1 files changed, 10 insertions, 1 deletions
diff --git a/stdlib/source/lux/target/jvm/encoding/name.lux b/stdlib/source/lux/target/jvm/encoding/name.lux
index 7f2119bc0..1ba56573a 100644
--- a/stdlib/source/lux/target/jvm/encoding/name.lux
+++ b/stdlib/source/lux/target/jvm/encoding/name.lux
@@ -1,7 +1,8 @@
 (.module:
   [lux #*
    [data
-    ["." text]]
+    ["." text
+     ["%" format (#+ format)]]]
    [type
     abstract]])
 
@@ -30,3 +31,11 @@
     (|>> :representation
          (text.replace-all ..internal-separator
                            ..external-separator))))
+
+(def: #export sanitize
+  (-> Text External)
+  (|>> ..internal ..external))
+
+(def: #export (qualify package class)
+  (-> Text External External)
+  (format (..sanitize package) ..external-separator class))