mirror of
https://framagit.org/framasoft/mobilizon.git
synced 2024-12-23 00:14:48 +00:00
559c889f1b
Signed-off-by: Thomas Citharel <tcit@tcit.fr>
17 lines
420 B
Elixir
17 lines
420 B
Elixir
defmodule Mobilizon.Slug do
|
|
@moduledoc """
|
|
Common functions for slug generation
|
|
"""
|
|
def increment_slug(slug) do
|
|
case List.pop_at(String.split(slug, "-"), -1) do
|
|
{nil, _} ->
|
|
slug
|
|
|
|
{suffix, slug_parts} ->
|
|
case Integer.parse(suffix) do
|
|
{id, _} -> Enum.join(slug_parts, "-") <> "-" <> Integer.to_string(id + 1)
|
|
:error -> slug <> "-1"
|
|
end
|
|
end
|
|
end
|
|
end
|