Index: fp_fs.c
===================================================================
--- fp_fs.c	(revision 14614)
+++ fp_fs.c	(revision 14615)
@@ -170,6 +170,7 @@
 		 * may exist in a library tree to provide an html browsable
 		 * index of the library.
 		 */
+#warning fp TODO: make this a configurable list
 		l = strlen(subdirentry->d_name);
 		if (!stat(subdirentry->d_name, &buffer)
 				&& subdirentry->d_name[0] != '.'
@@ -367,6 +368,7 @@
 	int Talloced = 0, Tused = 0;
 	pcb_fptype_t ret = PCB_FP_INVALID;
 
+#warning fp TODO: rather call plug_io if it is not parametric
 	if (tags != NULL)
 		*tags = NULL;
 
@@ -391,6 +393,7 @@
 				state = ST_COMMENT;
 				break;
 			}
+#warning fp TODO: rather call plug_io if it is not parametric
 			else if ((first_element) && (c == 'l')) {
 				char s[23];
 				/* li:pcb-rnd-subcircuit */
@@ -411,6 +414,16 @@
 					break;
 				}
 			}
+			else if ((first_element) && (c == '(')) {
+				char s[8];
+				/* module */
+				fgets(s, 7, f);
+				s[6] = '\0';
+				if (strcmp(s, "module") == 0) {
+					state = ST_ELEMENT;
+					break;
+				}
+			}
 			first_element = 0;
 			/* fall-thru for detecting @ */
 		case ST_COMMENT: