4 files changed,
0 insertions(+),
11 deletions(-)
Author:
Olexandr Smirnov
ss2316544@gmail.com
Committed by:
GitHub
noreply@github.com
Committed at:
2025-07-01 13:36:44 +0300
Parent:
62e4dde
M
web/review/src/ReviewConfig.elm
··· 7 7 import NoExposingEverything 8 8 import NoImportingEverything 9 9 import NoMissingTypeAnnotation 10 -import NoMissingTypeAnnotationInLetIn 11 10 import NoMissingTypeExpose 12 11 import NoPrematureLetComputation 13 12 import NoSimpleLetBody ··· 32 31 , NoExposingEverything.rule 33 32 , NoImportingEverything.rule [] 34 33 , NoMissingTypeAnnotation.rule 35 - , NoMissingTypeAnnotationInLetIn.rule 36 34 , NoMissingTypeExpose.rule 37 35 , NoSimpleLetBody.rule 38 36 , NoPrematureLetComputation.rule
M
web/src/Pages/Auth.elm
··· 210 210 viewBannerSuccess : Maybe Posix -> Maybe Posix -> Html Msg 211 211 viewBannerSuccess now lastClicked = 212 212 let 213 - buttonClassesBase : String 214 213 buttonClassesBase = 215 214 "w-full px-4 py-2 rounded-md focus:outline-none focus:ring-2 focus:ring-black focus:ring-offset-2 transition-colors mt-3" 216 215 217 - buttonClasses : Bool -> String 218 216 buttonClasses active = 219 217 if active then 220 218 buttonClassesBase ++ " border border-gray-300 text-gray-700 hover:bg-gray-50" ··· 227 225 case ( now, lastClicked ) of 228 226 ( Just now_, Just last ) -> 229 227 let 230 - remainingMs : Int 231 228 remainingMs = 232 229 30 * 1000 - (Time.posixToMillis now_ - Time.posixToMillis last) 233 230 in ··· 287 284 viewChangeVariant : Variant -> Html Msg 288 285 viewChangeVariant variant = 289 286 let 290 - base : String 291 287 base = 292 288 "flex-1 px-4 py-2 rounded-md font-medium transition-colors" 293 289
M
web/src/Pages/Home_.elm
··· 105 105 106 106 UserClickedSubmit -> 107 107 let 108 - expiresAt : Posix 109 108 expiresAt = 110 109 case ( model.now, model.expirationTime ) of 111 110 ( Just now, Just expirationTime ) -> ··· 442 441 viewCopyLinkButton : Bool -> Html Msg 443 442 viewCopyLinkButton isClicked = 444 443 let 445 - base : String 446 444 base = 447 445 "px-4 py-2 border rounded-md focus:outline-none focus:ring-2 focus:ring-black focus:ring-offset-2 transition-colors" 448 446 in
M
web/src/Pages/Secret/Slug_.elm
··· 273 273 -> Html Msg 274 274 viewOpenNote opts = 275 275 let 276 - isDisabled : Bool 277 276 isDisabled = 278 277 opts.hasPassword && Maybe.withDefault "" opts.password == "" 279 278 280 - buttonData : { text : String, class : String } 281 279 buttonData = 282 280 let 283 - base : String 284 281 base = 285 282 "px-6 py-3 rounded-md focus:outline-none focus:ring-2 focus:ring-black focus:ring-offset-2 transition-colors" 286 283 in