bentayloruk

• Anjunadeep Editions on SoundCloud #deephouse.

bentayloruk

open System
open System
open System.ComponentModel

let readLine () =
    Console.ReadLine().ToLower()

let exit () =
    printfn "\r\nByyyyyyyyyyeeeeeeeeeeeeeee zzzzzzzzzzzzzzzzzzzz\r\n"
    0

bentayloruk

A finely curated list of resources used to my inform my adventures with Elmish:

• Thread on routing philosphy. The options and some guidance from experience.

bentayloruk

module ReactQueryBuilder

open Fable.Core
open Fable.Import
open Fable.Import.React
open Fable.Core.JsInterop
open Fable.Helpers.React.Props
open System

// TODO

bentayloruk

//install-package Autofac.
using System;
using System.Collections.Generic;
using System.Globalization;
using System.Linq;
using Autofac;

namespace Funcofac
{
    class Program

bentayloruk

module IssueInvestiations

open Xunit
open Enticify.Promotions

[<Fact>]
let ``Issue 261 - item and shipping discount interaction`` () =

    let (basket, orderForm) =
        createBasket

bentayloruk

(*
    Reset Pathogen Bundles from Github and Vim.org

    __IMPORTANT__
    * THIS SCRIPT WILL DELETE ALL BUNDLES IN YOUR PATHOGEN BUNDLE FOLDER.
    * THIS SCRIPT MAY BE X-PLAT BUT I'VE NOT TESTED IT, SO I DOUBT IT IS.  
    * THERE IS NOT MUCH IN THE WAY OF ERROR RECOVER IN THIS SCRIPT.

    __Installation__
    1.   Install Pathogen https://github.com/tpope/vim-pathogen

bentayloruk

[CompilationMapping(SourceConstructFlags.RecordType)]
[Serializable]
public sealed class Person : IEquatable<Program.Person>, IStructuralEquatable, IComparable<Program.Person>, IComparable, IStructuralComparable
{
	[DebuggerBrowsable(DebuggerBrowsableState.Never)]
	internal string Name@;
	[DebuggerBrowsable(DebuggerBrowsableState.Never)]
	internal string Surname@;
	[CompilationMapping(SourceConstructFlags.Field, 0)]
	public string Name

bentayloruk

EnvironmentHelper.fs

let isUnix = System.Environment.OSVersion.Platform = System.PlatformID.Unix

let platformInfoAction (psi:ProcessStartInfo) =
    if isUnix && psi.FileName.EndsWith ".exe" then
      psi.Arguments <- psi.FileName + " " + psi.Arguments
      psi.FileName <- "mono"   

ProcessHelper.fs

bentayloruk

public class ProductDisplayWithPromoInfo
{
      public ProductDisplayDto CreateProductDisplayDto(Product product)
      {
            //Get the PromoShoutOutService
            var shoutOutService = PromotionContext.Current().CreatePromoShoutOutService();

            //Get the explicitly configured shouts outs for the product (the ones with ShoutOut in the CS discount comment field)
            var productPromoShoutOuts = shoutOutService.GetPromoShoutOutsForProduct(product, ShoutOutSelection.ExplicitlyConfiguredForShoutOut);