diff options
Diffstat (limited to 'src/interp/clam.boot')
| -rw-r--r-- | src/interp/clam.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/clam.boot b/src/interp/clam.boot index db2ad360..a4b2f8b9 100644 --- a/src/interp/clam.boot +++ b/src/interp/clam.boot @@ -356,7 +356,7 @@ clearCategoryCaches() == if getConstructorKindFromDB name = "category" then if BOUNDP(cacheName:= mkCacheName name) then setDynamicBinding(cacheName,nil) - if BOUNDP(cacheName:= INTERNL strconc(PNAME name,'";CAT")) + if BOUNDP(cacheName:= INTERNL strconc(symbolName name,'";CAT")) then setDynamicBinding(cacheName,nil) clearCategoryCache catName == |