show user loaded packages in the banner

Author: IanButterworth

stdlib/REPL/src/REPL.jl

@@ -1732,6 +1732,15 @@ function banner(io::IO = stdout; short = false)
         end
     end
 
+    loaded_user_models = filter(names(Main,imported=true)) do m
+        typeof(getfield(Main, m)) <:  Module && m ∉ (:Base, :Core, :Main, :Pkg)
+    end
+    if isempty(loaded_user_models)
+        loaded_modules_string = ""
+    else
+        loaded_modules_string = "Loaded packages: $(join(loaded_user_models, ", "))"
+    end
+
     commit_date = isempty(Base.GIT_VERSION_INFO.date_string) ? "" : " ($(split(Base.GIT_VERSION_INFO.date_string)[1]))"
 
     if get(io, :color, false)::Bool
@@ -1756,7 +1765,7 @@ function banner(io::IO = stdout; short = false)
               $(jl)| | | | | | |/ _` |$(tx)  |
               $(jl)| | |_| | | | (_| |$(tx)  |  Version $(VERSION)$(commit_date)
              $(jl)_/ |\\__'_|_|_|\\__'_|$(tx)  |  $(commit_string)
-            $(jl)|__/$(tx)                   |
+            $(jl)|__/$(tx)                   |  $(loaded_modules_string)
 
             """)
         end