Skip to content

Instantly share code, notes, and snippets.

Avatar

Paul MagnificentPako

View GitHub Profile
View uuid.c
/* Part of SWI-Prolog
Author: Jan Wielemaker
E-mail: J.Wielemaker@vu.nl
WWW: http://www.swi-prolog.org
Copyright (c) 2012-2018, VU University Amsterdam
CWI, Amsterdam
All rights reserved.
Redistribution and use in source and binary forms, with or without
View main.pl
#!/usr/bin/env swipl
:- use_module(library(shell)).
:- use_module(library(option)).
:- use_module(library(crypto)).
:- use_module(library(random)).
:- use_module(library(http/http_host)).
:- use_module(library(http/http_error)).
:- use_module(library(http/html_write)).
:- use_module(library(http/http_files)).
View docker-compose.yml
version: '3.1'
services:
db:
image: postgres
restart: always
environment:
POSTGRES_PASSWORD: 12345
ports:
- 5432:5432
View id_ed25519.pub
ssh-ed25519 AAAAC3NzaC1lZDI1NTE5AAAAIAj0MkuRJWItL7k8p1Rwfdd6wG+BVun8/YH1niJcRXUu my@procrastination.life
View id_rsa.pub
ssh-rsa AAAAB3NzaC1yc2EAAAADAQABAAACAQCkoaXtUpjRkzvt55lp/fXRCTssk5JgjHdk5nl1l1vwCyAt6pno6FbdOy5Ov+a25/BRdNPMtyIen1vGPAcMiUsXV5PsJXdyN7cstY3svMCfXmqXTyogHOELZGnrnA9ybZEBcP+QUhFqerkiHIih7nWY0JVfW5F0stH6s5Jenwd9FVBxtb2kPqM48zvUE15cdTm8LPQuiNiRr9wsII11mQObl/2hvzdx3kbDTFCOXBugZLUkkrXF5+Tb+dZGabs5qGVi7gvLKwpouzvlB3JcMVovxYkJVmEeIv5tpRHozvB5jxxOmzcMDgK341ezZusXVCCZmzNkoUjv89yL6aPXqIe+7Itf84yS56T9EkHjS94sx9nI+Z/Lt5/Qv/ymRrx18vxvOAe7Z4Pa2T+JgHJ+UwXlgiywTCdR/XVGupu/2r39yAiVTqP1ii3pCI1C5fssUevmhMEa8gs6bGSXetzXzf07glFG6BJmkTDFRPkycbxf5h9iIz42AlKq7fw9IF/RCzndrZZC0DYMpwLaRY42eFBsD5q23WZAba1fRVNYWwT59PTo5bOEQikvGmuRDT99cW0PppQrhnS5rB8f7vSiWedkkE2biyhgz3k3FPd+58NLyMHSPt0cgVg2GgAz6hHRqoY18MFlytybt/iHEExlXuENkiXKRQ0tp1TuY2KFCYz8ow== paul@hentai
View Main.hs
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
module Main where
import Control.Monad.IO.Class
import qualified Control.Monad.Random as R
import Data.Aeson
import qualified Data.ByteString.Lazy.UTF8 as BS
View uguush
#!/usr/bin/env bash
#
# uguush - command-line uploader for uguu.se and others
#
## CONFIGURATION
# colors
c0="$(tput sgr0)"
c1="$(tput setaf 1)"
View aesthetic
#!/usr/bin/env sh
sed "y/,.:;!?\"'\`^~0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz/,.:;!?"'`^~0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz/"
View ipfsup.stride.press.conf
server {
server_name ipfsup.stride.press;
location / {
proxy_pass http://127.0.0.1:8088;
proxy_set_header X-Real-IP $remote_addr;
proxy_set_header X-Forwarded-For $proxy_add_x_forwarded_for;
proxy_set_header Host $http_host;
proxy_set_header X-Forwarded-For $proxy_add_x_forwarded_for;
proxy_set_header X-Forwarded-Proto $scheme;
View gist:530131f138629ea01e39d0338bd3b657
src/App.hs:61:18: error:
• Couldn't match type ‘[]’
with ‘Web.Scotty.Internal.Types.ActionT T.Text IO’
Expected type: Web.Scotty.Internal.Types.ActionT T.Text IO [String]
Actual type: [[String]]
• In a stmt of a 'do' block:
names <- mapM
(\ h
-> do n <- liftIO $ Data.Cache.lookup cache h
name <- case n of
You can’t perform that action at this time.