diff --git a/ice-9/slib.scm b/ice-9/slib.scm
index 94bcb481c..44fbdf6e7 100644
--- a/ice-9/slib.scm
+++ b/ice-9/slib.scm
@@ -212,7 +212,7 @@
 			  '*sc-expander*
 			  '(define)))
 
-(define-public (slib:software-type)
+(define (software-type)
   "Return a symbol describing the current platform's operating system.
 This may be one of AIX, VMS, UNIX, COHERENT, WINDOWS, MS-DOS, OS/2,
 THINKC, AMIGA, ATARIST, MACH, or ACORN.