Kevin Brubeck Unhammer unhammer

## git-is-related
#!/bin/sh

if [ $# -lt 1 ]; then
    echo "Expecting one or two arguments" >&2
    exit 2
fi
a=$1
b=$2
[ -z "$b" ] && b=HEAD

## legal-xml-ids.txt
[#xC0-#xD6] À Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ð Ñ Ò Ó Ô Õ Ö
[#xD8-#xF6] Ø Ù Ú Û Ü Ý Þ ß à á â ã ä å æ ç è é ê ë ì í î ï ð ñ ò ó ô õ ö

## Adder.hs
{-# LANGUAGE ForeignFunctionInterface #-}
module Adder where

import Foreign.C

adder :: CInt -> CInt -> IO CInt
adder x y = return $ x + y

foreign export ccall adder :: CInt -> CInt -> IO CInt

## Words.hs
-----------------------------------------------------------------------------
-- |
-- Module      :  Data.Algorithm.Diff.Words
-- Copyright   :  (c) Kevin Brubeck Unhammer 2020
-- License     :  BSD 3 Clause
-- Maintainer  :  s.clover@gmail.com
-- Stability   :  experimental
-- Portability :  portable
--
-- Convenience functions for "word-diffing" / grouping diffs by separators.

## Pascal.hs
import Control.Applicative ((<$>))

center :: String -> Int -> String
center s n = spaces ++ s ++ spaces
  where spaces = replicate ((n - length s) `div` 2) ' '

-- http://www.haskell.org/haskellwiki/Blow_your_mind, Ctrl-F "pascal"
pascal :: [[Int]]
pascal = iterate (\row -> zipWith (+) ([0] ++ row) (row ++ [0])) [1]

## .tmux.conf
bind-key    -T root         DoubleClick1Pane        if-shell -F -t = "#{||:#{mouse_any_flag},#{pane_in_mode}}" "select-pane -t=; send-keys -M" "display-menu -t= -xM -yM -T \"#[align=centre]#{pane_index} (#{pane_id})\"     'Open in Emacs' 'e' {run 'cd \"#{pane_current_path}\" && ~/bin/switch-to-emacsclient \"#{q:mouse_word}\"'}     ''    '#{?mouse_word,Search For #[underscore]#{=/9/...:mouse_word},}' 'C-r' {copy-mode -t=; send -Xt= search-backward \"#{q:mouse_word}\"}      '#{?mouse_word,Type #[underscore]#{=/9/...:mouse_word},}' 'C-y' {send-keys -l -- \"#{q:mouse_word}\"}      '#{?mouse_word,Copy #[underscore]#{=/9/...:mouse_word},}' 'c' {set-buffer -- \"#{q:mouse_word}\"}       '#{?mouse_line,Copy Line,}' 'l' {set-buffer -- \"#{q:mouse_line}\"}     ''     'Horizontal Split' 'h' {split-window -h} 'Vertical Split' 'v' {split-window -v} '' 'Swap Up' 'u' {swap-pane -U} 'Swap Down' 'd' {swap-pane -D} '#{?pane_marked_set,,-}Swap Marked' 's' {swap-pane} '' '#{?pane_marked,Unmark,Mark}' 'm' {select-pane -m} '#{?wind

## test.html
<html>
  <head>
    <style>
    h1 {
      font-family: Verdana;
    }
    </style>
  </head>
  <body>
    <h1>RAWR</h1>

## test.md

      
              1 file
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                unhammer
                / test.md
            
            
              Created Jun 25, 2020
            
              
                meh
              
          
      View test.md
  
      
    blah
stuff!
code:
{
  "foo": "bar"
}

  
## wp-email-validate-check.php
<?php

/*
When using a current PHP version, class-phpmailer.php:validateAddress() uses a complex regex ("pcre8") for email address validation.

PHP < 7.3 uses libpcre 8.x.
PHP 7.3 uses libpcre2 10.x.
Due to a bug in libpcre2 < 10.32-RC1 https://bugs.exim.org/show_bug.cgi?id=2300,
this email regex validation fails in PHP 7.3 with PCRE_VERSION < 10.32.

## install-mssql-ubuntu.sh
#!/bin/bash

# https://askubuntu.com/a/1033956/25639

set -e -u

wget -qO- https://packages.microsoft.com/keys/microsoft.asc \
    | sudo apt-key add -
echo 'deb [arch=amd64] https://packages.microsoft.com/ubuntu/16.04/mssql-server-2017 xenial main' \
    | sudo tee /etc/apt/sources.list.d/mssql-server.list
	#!/bin/sh

	if [ $# -lt 1 ]; then
	echo "Expecting one or two arguments" >&2
	exit 2
	fi
	a=$1
	b=$2
	[ -z "$b" ] && b=HEAD
	[#xC0-#xD6] À Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ð Ñ Ò Ó Ô Õ Ö
	[#xD8-#xF6] Ø Ù Ú Û Ü Ý Þ ß à á â ã ä å æ ç è é ê ë ì í î ï ð ñ ò ó ô õ ö
	{-# LANGUAGE ForeignFunctionInterface #-}
	module Adder where

	import Foreign.C

	adder :: CInt -> CInt -> IO CInt
	adder x y = return $ x + y

	foreign export ccall adder :: CInt -> CInt -> IO CInt
	-----------------------------------------------------------------------------
	-- \|
	-- Module : Data.Algorithm.Diff.Words
	-- Copyright : (c) Kevin Brubeck Unhammer 2020
	-- License : BSD 3 Clause
	-- Maintainer : s.clover@gmail.com
	-- Stability : experimental
	-- Portability : portable
	--
	-- Convenience functions for "word-diffing" / grouping diffs by separators.
	import Control.Applicative ((<$>))

	center :: String -> Int -> String
	center s n = spaces ++ s ++ spaces
	where spaces = replicate ((n - length s) `div` 2) ' '

	-- http://www.haskell.org/haskellwiki/Blow_your_mind, Ctrl-F "pascal"
	pascal :: [[Int]]
	pascal = iterate (\row -> zipWith (+) ([0] ++ row) (row ++ [0])) [1]
	<html>
	<head>
	<style>
	h1 {
	font-family: Verdana;
	}
	</style>
	</head>
	<body>
	<h1>RAWR</h1>
	<?php

	/*
	When using a current PHP version, class-phpmailer.php:validateAddress() uses a complex regex ("pcre8") for email address validation.

	PHP < 7.3 uses libpcre 8.x.
	PHP 7.3 uses libpcre2 10.x.
	Due to a bug in libpcre2 < 10.32-RC1 https://bugs.exim.org/show_bug.cgi?id=2300,
	this email regex validation fails in PHP 7.3 with PCRE_VERSION < 10.32.
	#!/bin/bash

	# https://askubuntu.com/a/1033956/25639

	set -e -u

	wget -qO- https://packages.microsoft.com/keys/microsoft.asc \
	\| sudo apt-key add -
	echo 'deb [arch=amd64] https://packages.microsoft.com/ubuntu/16.04/mssql-server-2017 xenial main' \
	\| sudo tee /etc/apt/sources.list.d/mssql-server.list