mirror of
https://github.com/chylex/TweetDuck.git
synced 2025-06-01 02:34:04 +02:00
Reduce minification of resource files
This commit is contained in:
parent
994f9635ef
commit
c162761464
@ -64,6 +64,9 @@ let main (argv: string[]) =
|
|||||||
let collapseLines separator (sequence: string seq) =
|
let collapseLines separator (sequence: string seq) =
|
||||||
String.Join(separator, sequence)
|
String.Join(separator, sequence)
|
||||||
|
|
||||||
|
let splitLines (separator: char) (str: string) =
|
||||||
|
str.Split(separator) |> Seq.ofArray
|
||||||
|
|
||||||
let trimStart (line: string) =
|
let trimStart (line: string) =
|
||||||
line.TrimStart()
|
line.TrimStart()
|
||||||
|
|
||||||
@ -181,11 +184,9 @@ let main (argv: string[]) =
|
|||||||
lines
|
lines
|
||||||
|> Seq.map (fun line ->
|
|> Seq.map (fun line ->
|
||||||
line
|
line
|
||||||
|> trimStart
|
|
||||||
|> replaceRegex @"^(.*?)((?<=^|[;{}()])\s?//(?:\s.*|$))?$" "$1"
|
|> replaceRegex @"^(.*?)((?<=^|[;{}()])\s?//(?:\s.*|$))?$" "$1"
|
||||||
|> replaceRegex @"(?<!\w)(return|throw)(\s.*?)? if (.*?);" "if ($3)$1$2;"
|
|> replaceRegex @"(?<!\w)(return|throw)(\s.*?)? if (.*?);" "if ($3)$1$2;"
|
||||||
)
|
)
|
||||||
|> filterNotEmpty
|
|
||||||
);
|
);
|
||||||
|
|
||||||
".css", (fun (lines: string seq) ->
|
".css", (fun (lines: string seq) ->
|
||||||
@ -193,20 +194,18 @@ let main (argv: string[]) =
|
|||||||
|> Seq.map (fun line ->
|
|> Seq.map (fun line ->
|
||||||
line
|
line
|
||||||
|> replaceRegex @"\s*/\*.*?\*/" ""
|
|> replaceRegex @"\s*/\*.*?\*/" ""
|
||||||
|> replaceRegex @"^(\S.*) {$" "$1{"
|
|> replaceRegex @"^(\S.*) {$" "$1 { "
|
||||||
|> replaceRegex @"^\s+(.+?):\s*(.+?)(?:\s*(!important))?;$" "$1:$2$3;"
|
|> replaceRegex @"^\s+(.+?):\s*(.+?)(?:\s*(!important))?;$" "$1:$2$3;"
|
||||||
)
|
)
|
||||||
|> filterNotEmpty
|
|> filterNotEmpty
|
||||||
|> collapseLines " "
|
|> collapseLines " "
|
||||||
|> replaceRegex @"([{};])\s" "$1"
|
|> replaceRegex @"([{};])\s" "$1"
|
||||||
|> replaceRegex @";}" "}"
|
|> replaceRegex @";?}" " }\n"
|
||||||
|> Seq.singleton
|
|> splitLines '\n'
|
||||||
);
|
);
|
||||||
|
|
||||||
".html", (fun (lines: string seq) ->
|
".html", (fun (lines: string seq) ->
|
||||||
lines
|
lines
|
||||||
|> Seq.map trimStart
|
|
||||||
|> filterNotEmpty
|
|
||||||
);
|
);
|
||||||
|
|
||||||
".meta", (fun (lines: string seq) ->
|
".meta", (fun (lines: string seq) ->
|
||||||
|
Loading…
Reference in New Issue
Block a user