diff --git a/gap/crypting.gd b/gap/crypting.gd
index f0594ce..4914521 100644
--- a/gap/crypting.gd
+++ b/gap/crypting.gd
@@ -11,7 +11,7 @@
 #
 
 #!
-DeclareCategory("IsSHA256State", IsObject);
+DeclareCategory("IsCryptingSHA256State", IsObject);
 # DeclareGlobalVariable("CRYPTING_SHA256_State_Family");
 # DeclareGlobalVariable("CRYPTING_SHA256_State_Type", "State of SHA256");
 
diff --git a/gap/crypting.gi b/gap/crypting.gi
index b357c51..0b464f1 100644
--- a/gap/crypting.gi
+++ b/gap/crypting.gi
@@ -10,7 +10,7 @@ BindGlobal("CRYPTING_SHA256_State_Family",
 
 BindGlobal("CRYPTING_SHA256_State_Type",
            NewType(CRYPTING_SHA256_State_Family,
-                   IsSHA256State) );
+                   IsCryptingSHA256State) );
 
 
 InstallGlobalFunction( CRYPTING_HexStringIntPad,
@@ -28,7 +28,7 @@ InstallGlobalFunction( CRYPTING_HexStringIntPad8,
     i -> CRYPTING_HexStringIntPad(i, 8, '0'));
 
 InstallMethod( ViewString, "for a SHA256 state",
-               [ IsSHA256State ], x -> "<sha256 state>");
+               [ IsCryptingSHA256State ], x -> "<sha256 state>");
 
 InstallGlobalFunction( SHA256String,
 function(str)