Packages

toolshed

0.2.26
0.5.0 0.4.2 0.4.1 0.4.0 0.3.2 0.3.1 0.3.0 0.2.26 0.2.25 0.2.24 0.2.23 0.2.22 0.2.21 0.2.20 0.2.19 0.2.18 0.2.17 0.2.16 0.2.15 0.2.14 0.2.13 0.2.12 0.2.11 0.2.10 0.2.9 0.2.8 0.2.7 0.2.6 0.2.5 0.2.4 0.2.3 0.2.2 0.2.1 0.2.0 0.1.0

Use Toolshed for more IEx helpers

HexDocs

Current section

Files

Jump to
Readme
35 Versions
1 Dependency
Dependants
Files
Activity
toolshed lib toolshed history.ex
Raw

lib/toolshed/history.ex 

defmodule Toolshed.History do

  @moduledoc false



  @doc """

  Print out the IEx shell history



  The default is to print the history from the current group leader, but

  any group leader can be passed in if desired.

  """

  @spec history(pid()) :: :"do not show this result in output"

  def history(gl \\ Process.group_leader()) do

    commands = last_commands(gl)

    format = format_spec(length(commands))



    commands

    |> Enum.with_index(1)

    |> Enum.map(fn {line, index} -> :io_lib.format(format, [index, line]) end)

    |> IO.puts()



    :"do not show this result in output"

  end



  defp last_commands(gl) do

    case get_in(Process.info(gl), [:dictionary, :line_buffer]) do

      nil -> []

      list -> Enum.reverse(list)

    end

  end



  defp format_spec(highest_number) do

    number_size = :math.log10(highest_number + 1) |> ceil()

    '~#{number_size}B  ~ts'

  end

end