Merge pull request #2932 from tonini/add-modules-load-path-to-autocomplete

Fetch module names from load path for autocomplete

Signed-off-by: José Valim <[email protected]>

Author: josevalim

lib/iex/lib/iex/autocomplete.ex

@@ -188,13 +188,25 @@ defmodule IEx.Autocomplete do
   end
 
   defp modules_as_lists(true) do
-    ["Elixir.Elixir"] ++ modules_as_lists(false)
+    modules = ["Elixir.Elixir"] ++ modules_as_lists(false)
+    modules = if :code.get_mode() === :interactive do
+                modules ++ loaded_applications_as_lists
+              end
+    Enum.uniq(modules)
   end
 
   defp modules_as_lists(false) do
     Enum.map(:code.all_loaded, fn({m, _}) -> Atom.to_string(m) end)
   end
 
+  defp loaded_applications_as_lists do
+    for {app, _, _} <- :application.loaded_applications,
+        {_, modules} = :application.get_key(app, :modules),
+             module <- modules do
+      Atom.to_string(module)
+    end
+  end
+
   ## Helpers
 
   defp module_funs(mod, hint) do

lib/iex/test/iex/autocomplete_test.exs

@@ -34,6 +34,13 @@ defmodule IEx.AutocompleteTest do
     assert expand('Enumerable') == {:yes, '.', []}
   end
 
+  test :elixir_auto_completion_on_modules_from_load_path do
+    assert expand('Str') == {:yes, [], ['String', 'StringIO', 'Stream']}
+    assert expand('Ma') == {:yes, '', ['Macro', 'Map', 'MatchError']}
+    assert expand('Dic') == {:yes, 't.', []}
+    assert expand('Ex')  == {:yes, [], ['Exception', 'ExUnit']}
+  end
+
   test :elixir_no_completion do
     assert expand('.')   == {:no, '', []}
     assert expand('Xyz') == {:no, '', []}