Akii

Akii

<template>
  <div>
    <span class="visually-hidden" :aria-hidden="!readonly">{{ starLabel(value) }}</span>

    <span v-for="i in [1, 2, 3, 4, 5]" :key="i" :aria-hidden="readonly">
      <label class="visually-hidden">
        {{ starLabel(i) }}

        <input
          type="radio"

Akii

defmodule Stuff do
  use Combine

  defmodule ContentRangeRequest do
    @moduledoc """
    Represents the Range header sent by the client
    """

    defstruct key: :id, id: nil, offset: 0, limit: 0, order: :asc
  end

Akii

def parse_range(range, max_limit \\ 500) do
  range_p =
    either(
      many1(alphanumeric()) |> ignore(space()) |> string() |> ignore(char(";")),
      many1(alphanumeric()) |> ignore(char(";"))
    )

  limit_p = fn a -> a |> ignore(string("limit ")) |> integer() |> ignore(char(";")) end
  offset_p = fn a -> a |> ignore(string("offset ")) |> integer() |> ignore(char(";")) end

Akii

defmodule Elescore.Projection.Downtimes do
  use GenServer

  def start_link() do
    GenServer.start_link(__MODULE__, nil, name: __MODULE__)
  end

  def init(_arg) do
    # We wait a bit for the disruption projection
    Process.send_after(self(), :calculate_downtimes, 30_000)

Akii

executeForm :: FormV2 -> Bool -> PageM [TagTree LBS.ByteString]
executeForm FormV2 {..} doSubmit = do
  initRequest
  personalPage personal
  disabilitiesPage disabilities

  outwardMeetingPoints <- executeOutwardConnection outwardTrainRide (isJust returnTrainRide)
  returnMeetingPoints <- executeReturnConnection returnTrainRide

  meetingPointsPage outwardMeetingPoints returnMeetingPoints

Akii

import qualified Data.ByteString.Lazy      as LBS
import           Text.HTML.TagSoup
import           Text.HTML.TagSoup.Tree

addBaseTag :: LBS.ByteString -> [TagTree LBS.ByteString] -> [TagTree LBS.ByteString]
addBaseTag href = transformTree f
  where
    f (TagBranch "head" attrs subTrees) = [TagBranch "head" attrs (baseTag : subTrees)]
    f x = [x]

Akii

-- The goal was to parse a text describing the connection which is used by screen readers:
-- Strecke von Karlsruhe Hbf, Abfahrtszeit 11:59 von Gleis 3 nach Berlin Hauptbahnhof, Ankunftszeit 18:03 auf Gleis 2, mit ICE 370

-- Translated:
-- Connection from Karlsruhe Hbf, Departuretime 11:59 from track 3 to Berlin Hauptbahnhof, Arrivaltime 18:03 on track 2, with ICE 370

data Connection
  = Departure
      { departStation :: Text
      , departAt      :: Text

Akii

document.addEventListener("DOMContentLoaded", function() {
  let hiddenChannels = ['general']
  let blockedUsers = ['Slackbot']

  let customCss = `
    .p-channel_sidebar__static_list div[role="listitem"]:empty { display: none; }
  `

  hiddenChannels.concat(blockedUsers).forEach(it => {
    customCss += `a[aria-label~="${it}"] { display: none; }\n`

Akii

{-# LANGUAGE DataKinds #-}
{-# LANGUAGE FlexibleContexts      #-}
{-# LANGUAGE FlexibleInstances     #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE OverloadedStrings     #-}
{-# LANGUAGE ScopedTypeVariables   #-}
{-# LANGUAGE TypeFamilies          #-}
{-# LANGUAGE TypeOperators         #-}
{-# LANGUAGE UndecidableInstances  #-}
{-# LANGUAGE ViewPatterns          #-}