Convert to .NET 6 (#27); WIP on mobile view (#25)

This commit is contained in:
Daniel J. Summers 2021-09-16 18:28:43 -04:00
parent a1d1b53ff4
commit 98659f6cfc
6 changed files with 18547 additions and 42 deletions

View File

@ -20,7 +20,6 @@ type MastodonAccount () =
member val Url = "" with get, set
open FSharp.Control.Tasks
open Microsoft.Extensions.Logging
open System
open System.Net.Http

View File

@ -1,7 +1,6 @@
/// Data access functions for Jobs, Jobs, Jobs
module JobsJobsJobs.Api.Data
open FSharp.Control.Tasks
open JobsJobsJobs.Domain.Types
open Polly
open RethinkDb.Driver

View File

@ -1,7 +1,6 @@
/// Route handlers for Giraffe endpoints
module JobsJobsJobs.Api.Handlers
open FSharp.Control.Tasks
open Giraffe
open JobsJobsJobs.Domain
open JobsJobsJobs.Domain.SharedTypes
@ -288,7 +287,7 @@ module Listing =
// PATCH: /api/listing/[id]
let expire listingId : HttpHandler =
authorize
>=> fun next ctx -> task {
>=> fun next ctx -> FSharp.Control.Tasks.Affine.task {
let dbConn = conn ctx
let now = clock(ctx).GetCurrentInstant ()
match! Data.Listing.findById (ListingId listingId) dbConn with
@ -309,8 +308,7 @@ module Listing =
| None -> ()
return! ok next ctx
| None -> return! Error.notFound next ctx
}
}
// GET: /api/listing/search
let search : HttpHandler =

File diff suppressed because it is too large Load Diff

View File

@ -1,6 +1,6 @@
{
"name": "jobs-jobs-jobs",
"version": "2.1.0",
"version": "2.2.0",
"private": true,
"scripts": {
"serve": "vue-cli-service serve",

View File

@ -1,16 +1,34 @@
<template lang="pug">
nav.navbar.navbar-light.bg-light
nav.navbar.navbar-dark.mobile
span.navbar-text: router-link(to="/") Jobs, Jobs, Jobs
button.btn(data-bs-toggle="offcanvas" data-bs-target="#mobileMenu" aria-controls="mobileMenu")
icon(:icon="mdiMenu")
nav.navbar.navbar-light.bg-light.wide
span &nbsp;
span.navbar-text.
(&hellip;and Jobs &ndash; #[audio-clip(clip="pelosi-jobs") Let&rsquo;s Vote for Jobs!])
</template>
<script setup lang="ts">
import { mdiMenu } from "@mdi/js"
import AudioClip from "@/components/AudioClip.vue"
</script>
<style lang="sass" scoped>
.navbar-text
font-style: italic
padding-right: 1rem
.mobile
background-image: linear-gradient(0deg, green 0%, darkgreen 70%)
button
padding: 0 1rem 0 0
.navbar-text
font-weight: bold
color: white
.wide
display: none
@media (min-width: 768px)
.wide
display: flex
.mobile
display: none
.navbar-text
font-style: italic
</style>