Minor updates

clean_dependencies.icl

@@ -4,8 +4,8 @@ module clean_dependencies
  * Plot dependencies between Clean libraries as a Dot graph. This uses
  * libraries from Cloogle, https://gitlab.science.ru.nl/cloogle/Cloogle. This
  * requires the file types.json which is generated by the builddb script of
- * https://gitlab.science.ru.nl/cloogle/Cloogle. It can also be downloaded from
- * https://files.camilstaps.nl/cloogle-dumps.
+ * https://gitlab.science.ru.nl/cloogle/cloogle-org. It can also be downloaded
+ * from https://files.camilstaps.nl/cloogle-dumps.
  */
 
 import _SystemStrictLists
@@ -28,26 +28,26 @@ from Database.Native import :: Entry{value}
 import Cloogle.DB
 
 STANDARD =
-	[ "Dynamics"
+	[ "ABCInterpreter"
+	, "ArgEnv"
+	, "Directory"
+	, "Dynamics"
 	, "Gast"
 	, "GraphCopy"
 	, "iTasks"
+	, "ObjectIO"
 	, "Platform"
-	, "Sapl"
 	, "StdEnv"
+	, "StdLib"
 	, "TCPIP"
 	]
 
 DEPRECATED =
-	[ "ArgEnv"
-	, "Directory"
-	, "Generics"
-	, "MersenneTwister"
-	, "ObjectIO"
-	, "StdLib"
+	[ "MersenneTwister"
+	, "Sapl"
 	]
 
-IGNORE_MISCELLANEOUS :== True
+IGNORE_MISCELLANEOUS :== False
 
 Start w
 # (io,w) = stdio w
@@ -100,15 +100,16 @@ where
 		<<< '"' <<< d.from_lib <<< "\"->\"" <<< d.to_lib <<< '"'
 		<<< "["
 		<<< "penwidth=" <<< (1 + toInt (ln (toReal (length d.in_modules)))) <<< " "
-		<<< "label=\"" <<< label <<< "\" "
+		<<< "label=<" <<< label <<< "> "
 		<<< "tooltip=\"" <<< tooltip <<< "\" "
 		<<< "color=" <<< color <<< " fontcolor=" <<< color
 		<<< "]\n"
 	where
 		label = length d.in_modules <+ ": " +++
-			concat (intersperse ", " (take maxn d.in_modules)) +++
-			if (length d.in_modules > maxn) ", ..." ""
-		where maxn = 1
+			concat (intersperse ",<br/>" (take MAX_N_MODULES d.in_modules)) +++
+			if (length d.in_modules > MAX_N_MODULES) ", ..." ""
+		where
+			MAX_N_MODULES = 4
 
 		tooltip = concat (intersperse ", " d.in_modules)