Search, Paging, and "As of" Date #10

Merged
danieljsummers merged 15 commits from search into master 2019-03-21 00:19:02 +00:00
2 changed files with 17 additions and 1 deletions
Showing only changes of commit a4436fd844 - Show all commits

View File

@ -819,4 +819,7 @@
<data name="“As of” Date Display" xml:space="preserve">
<value>Visualización de la Fecha “Como de”</value>
</data>
<data name="as of" xml:space="preserve">
<value>como de</value>
</data>
</root>

View File

@ -579,7 +579,8 @@ with
(this.date - req.updatedDate).Days <= this.listGroup.preferences.daysToKeepNew
/// Generate this list as HTML
member this.asHtml (s : IStringLocalizer) =
let prefs = this.listGroup.preferences
let prefs = this.listGroup.preferences
let asOfSize = Math.Round (float prefs.textFontSize * 0.8, 2)
[ match this.showHeader with
| true ->
yield div [ _style (sprintf "text-align:center;font-family:%s" prefs.listFonts) ] [
@ -626,6 +627,18 @@ with
| Some _ -> ()
| None -> ()
yield rawText req.text
match prefs.asOfDateDisplay with
| NoDisplay -> ()
| ShortDate
| LongDate ->
let dt =
match prefs.asOfDateDisplay with
| ShortDate -> req.updatedDate.ToShortDateString ()
| LongDate -> req.updatedDate.ToLongDateString ()
| _ -> ""
yield i [ _style (sprintf "font-size:%fpt" asOfSize) ] [
rawText "&nbsp; ("; str s.["as of "].Value; str dt; rawText ")"
]
])
|> ul []
yield br []