•  = This file or directory is ignored

\n';

		// Loop through directory and examine each file
		Loop:(#FolderArray->Size);

			Local:'CurrentFile' = (#FolderArray)->(Get:(Loop_Count));

			#FormattedOutput += 'Checking if referenced: ' (#Path)(#CurrentFile);

				If: !(#CurrentFile)->EndsWith('/') && !(#CurrentFile)->BeginsWith('.DS_');

					#FormattedOutput += '
\n';

						// Examine each file to see if filename is referenced in that file
						Loop:(#FolderArray->Size);

							// Check to see if it is not a directory
							If: (File_IsDirectory:(#FolderArray->(Get:(Loop_Count)))) == false;

								Local:'ThisFile' = (#FolderArray->(Get:(Loop_Count)));

								// Check to see if .lasso or .inc file
								If: !(#ThisFile)->BeginsWith:'.DS_' && 
									((#ThisFile)->EndsWith:'.lasso' || (#ThisFile)->EndsWith:'.inc');

									#FormattedOutput += '   Looking inside: ' (#ThisFile) '
\n';

									Local:'ThisFileRead' = (File_Read: (#Path)(#FolderArray->(Get:(Loop_Count))));
									// If the filename is referenced in the file being examined, add it to the array
									If: (#ThisFileRead >>  #CurrentFile) && (#UsedFiles->(Find: #CurrentFile)->size == 0);
										#UsedFiles->(Insert: #CurrentFile);
										#FormattedOutput += '      Reference found!
\n';
									/if;
								/if;
							/If;
						/Loop;

		     	else;
					#FormattedOutput += '   •
\n';
	     		/if;
	     	/Loop;
	      
			// Put Unused files in array
			Loop: (#FolderArray->Size);
			If: (File_IsDirectory:(#FolderArray->(Get:(Loop_Count)))) == false;
		 		Local:'CurrentFile' = (#FolderArray->(Get:(Loop_Count)));

				If: !(#CurrentFile)->BeginsWith('.DS_');
					If: #UsedFiles->(Find: #CurrentFile)->size == 0;
						#UnusedFiles->Insert: #CurrentFile;
					/if;
				/If;
			/if;
		/Loop;

		// Sort the array for readability
		#UnusedFiles->sort;

		// Output HTML header
		#FormattedOutput += '
Unreferenced Files List
\n';
		#FormattedOutput += '
\n';

		Iterate: (#UnusedFiles), (#UnusedFiles->size);
			#FormattedOutput += (Loop_Count) ': ';
			#FormattedOutput += (#path)(#UnusedFiles->(Get:Loop_Count));
			#FormattedOutput += '
\n';
		
		/Iterate;

		#FormattedOutput += '
\n';

		Return:	Encode_Smart:(#FormattedOutput);

	/Inline;

/Define_Tag;

?>
[LI_UnreferencedFiles: -Path='/private_admin/']