vbfox

param([string]$dir);

$out = icacls "$dir" /verify /t /q
Foreach($line in $out)
{
    if ($line -match '(.:[^:]*): (.*)')
    {
        $path = $Matches[1]
        $acl = Get-Acl $path
        Set-Acl $path $acl

vbfox

module DapperFSharp =
    open System.Data.SqlClient
    open System.Dynamic
    open System.Collections.Generic
    open Dapper

    let dapperQuery<'Result> (query:string) (connection:SqlConnection) =
        connection.Query<'Result>(query)
    
    let dapperParametrizedQuery<'Result> (query:string) (param:obj) (connection:SqlConnection) : 'Result seq =

vbfox

From my CoderWall: https://coderwall.com/p/gvrn4w

Here is a better version of the code already present on Coderwall and on the official bug tracker.

The complexity of the original one is too big as it tries to update all packages found for all projects, instead of just the packages present on each project.

This one is a lot quicker to update everything in a big solution :

ForEach($project in get-project -all) { ForEach($package in Get-Package -ProjectName $project.ProjectName | ?{ $_.Id -like 'MyCompany*'}) { Update-Package -ProjectName $project.ProjectName -Id $package.Id;} }

vbfox

<wpf:ResourceDictionary xml:space="preserve" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" xmlns:s="clr-namespace:System;assembly=mscorlib" xmlns:ss="urn:shemas-jetbrains-com:settings-storage-xaml" xmlns:wpf="http://schemas.microsoft.com/winfx/2006/xaml/presentation">
	<s:Boolean x:Key="/Default/PatternsAndTemplates/StructuralSearch/Pattern/=2F4A0295AA4DD848965FCA6DA262D8B4/@KeyIndexDefined">True</s:Boolean>
	<s:String x:Key="/Default/PatternsAndTemplates/StructuralSearch/Pattern/=2F4A0295AA4DD848965FCA6DA262D8B4/Comment/@EntryValue">ArgumentNullException Thrown</s:String>
	<s:Boolean x:Key="/Default/PatternsAndTemplates/StructuralSearch/Pattern/=2F4A0295AA4DD848965FCA6DA262D8B4/IsReplacePattern/@EntryValue">True</s:Boolean>
	<s:String x:Key="/Default/PatternsAndTemplates/StructuralSearch/Pattern/=2F4A0295AA4DD848965FCA6DA262D8B4/LanguageName/@EntryValue">CSHARP</s:String>
	<s:String x:Key="/Default/PatternsAndTemplates/StructuralSearch/Pattern/=2F4A0295AA4DD848965FCA6DA262D8B4/ReplaceComment/@EntryV

vbfox

using Microsoft.FSharp.Core;
using NFluent;
using NFluent.Extensibility;

namespace UnitTests
{
    public static class FSharOptionCheckExtensions
    {  
        public static void IsNone<T>(this ICheck<FSharpOption<T>> check)
        {

vbfox

using System;
using Nancy;
using Nancy.Hosting.Self;
using Nancy.Responses;

namespace NancyRedirect
{
    public class Program : NancyModule
    {
        static void Main()

vbfox

//
// getline.fs: A command line editor
//
// Authors:
//   Miguel de Icaza (miguel@novell.com)
//   Julien Roncaglia (julien@roncaglia.fr)
//
// Copyright 2008 Novell, Inc.
// Copyright 2015 Julien Roncaglia <julien@roncaglia.fr>
//

vbfox

module Queue 
    // "Purely Functional Data Structures" by Chris Okasaki, Page 18 (Figure 3.2)
    open System

    type queue<'a> = { F : 'a list; R : 'a list }
    let empty = { queue.F = []; R = [] }
    let isEmpty queue = List.isEmpty queue.F
    let private makeQueue = function
        | ([], r) -> { F = List.rev r; R = [] }
        | (f, r) -> { F = f; R = r }

vbfox

using System;
using System.IO;
using System.Security;
using Microsoft.Win32;

static class UrlProtocol
{
    public static bool IsSupported(string protocol)
    {
        if (protocol == null) throw new ArgumentNullException("protocol");

vbfox

#r @"../packages/WinSCP/lib/WinSCPnet.dll"

open WinSCP
open System
open System.IO

type FtpServer =
    {
        HostName : string
        UserName : string