maxsu

# Looks for pattern PATTERN in file input.tex.
# Returns an empty-line delimited block of text surrounding the pattern.

awk 
    -v "pattern=PATTERN" 
    -v "bold=$(tput bold)" 
    -v "sgr0=$(tput sgr0)" 
    -v RS= 
    -v 'ORS=\n\n' 

maxsu

#!/bin/dash
logdir=~/logs
log=$logdir/changelog

echo '\n' >> $log
date >> $log
nano $log

maxsu

(import '(java.awt Point Graphics Frame) '(java.awt.geom AffineTransform))

(def minpoint (doto (Point.) (.setLocation 0 0)))
(def maxpoint (doto (Point.) (.setLocation 1000 1000)))

(defn draw [pts #^Frame w]
  (doseq [[x y] pts] (.fillRect (.getGraphics w) x y 1 1)))


(let [w (doto (Frame. "Bitmap") (.setSize 600 700) (.setVisible true))] ())