v0d1ch

module Helper.Aws
  (listAllEmails
  ) where

import           Control.Lens ((&), (.~))
import           Control.Monad.Trans.AWS (Error, runAWST, trying, _Error)
import           Data.ByteString (ByteString)
import           Network.AWS (Region (NorthVirginia), newEnv, runResourceT, send, within)
import           Network.AWS.Auth (AccessKey (..), Credentials (FromKeys), SecretKey (..))
import           Network.AWS.SES (IdentityType (..))

v0d1ch

body <- getRequest
  lift $ runConduitRes $ (consumeBody body) =$ sinkFile directory
  where
    consumeBody :: MonadIO m => YesodRequest -> ConduitM i ByteString m ()
    consumeBody body = do
      chunk <- liftIO $ NW.requestBody $ reqWaiRequest body
      if (chunk == BS.empty)
        then return ()
        else do
          yield chunk

v0d1ch

{-# LANGUAGE QuasiQuotes, TypeFamilies, GeneralizedNewtypeDeriving #-}
{-# LANGUAGE FlexibleContexts, FlexibleInstances, TemplateHaskell, OverloadedStrings #-}
{-# LANGUAGE GADTs, MultiParamTypeClasses, TypeSynonymInstances #-}

import Data.Text (Text)
import Data.ByteString (ByteString)
import Database.Persist.Sqlite
import Control.Monad.Logger (runStderrLoggingT)
import Yesod
import Yesod.Auth

v0d1ch

upstream yesod {
        server 127.0.0.1:3000;
        keepalive 8;
}

# the nginx server instance
server {
        listen 0.0.0.0:80;
        server_name haskell-serbia.com;
        access_log /var/log/nginx/access_yesod.log;

v0d1ch

 find . -iname '*.scss' -exec git log --since=2.weeks --name-status  {} +

v0d1ch

:put =range(11,15)

v0d1ch

:for i in range(1,10) | put ='array['.i.']' | endfor

v0d1ch

1,$s/\n/,/g  #replace comma with new line
%norm A*     #append * to every line
bufdo! %s/FIND/REPLACE/g    # search all buffers

v0d1ch

<select name="new-event-start">
    <option value="05:00">5:00</option>
    <option value="05:15">5:15</option>
    <option value="05:30">5:30</option>
    <option value="05:45">5:45</option>
    
    <option value="06:00">6:00</option>
    <option value="06:15">6:15</option>
    <option value="06:30">6:30</option>
    <option value="06:45">6:45</option>

v0d1ch

var traverseFolder = function(path)  
{  
     // Create new folder object based on path string  
     var folder = new Folder(path);  
  
     // Get all files in the current folder  
     var files = folder.getFiles();  
  
     // Loop over the files in the files object  
     for (var i = 0; i < files.length; i++)