Skip to content

Instantly share code, notes, and snippets.

View ralt's full-sized avatar

Florian Margaine ralt

View GitHub Profile
(define-widget aeon (QWidget)
())
(define-subwidget (aeon layout) (q+:make-qvboxlayout aeon)
(setf (q+:window-title aeon) "Aeon")))
(defun main ()
(with-main-window (window (make-instance 'aeon))))
(in-package #:aeon)
(named-readtables:in-readtable :qtools)
(define-widget aeon (QWidget) ())
(define-widget first-box (QHBoxLayout) ())
(define-widget start-button (QPushButton) ())
(define-subwidget (first-box start-button) (make-instance 'start-button))
(in-package #:aeon)
(named-readtables:in-readtable :qtools)
(define-widget aeon (QWidget) ())
(define-subwidget (aeon start-button) (q+:make-qpushbutton)
(q+:set-text start-button "Start"))
(define-subwidget (aeon filter-text) (q+:make-qlineedit)
(in-package #:aeon)
(named-readtables:in-readtable :qtools)
(define-widget aeon (QWidget) ())
(define-subwidget (aeon start-button) (q+:make-qpushbutton)
(setf (q+:text start-button) "Start"))
(define-subwidget (aeon filter-text) (q+:make-qlineedit)
@ralt
ralt / build-sbcl.sh
Last active August 29, 2015 14:16
SBCL install easy - source: http://plaster.tymoon.eu/view/85
#!/bin/bash
# This script requires sbcl git repo at /home/florian/Applications/sbcl/sbcl
# git checkout at the tag you want, and run ./build-sbcl.sh
readonly SBCL_REPO="git://sbcl.git.sourceforge.net/gitroot/sbcl/sbcl.git"
readonly BASE_DIR="/tmp/sbcl-git-build"
readonly SOURCE_DIR="/home/florian/Applications/sbcl/sbcl"
readonly BUILD_DIR="$BASE_DIR/build"
readonly CROSS_COMPILE_HOST="sbcl --disable-debugger --no-userinit --no-sysinit"
var month = require('C:/Users/Asus/Desktop/mod.js');
console.log(month.toNum('January'));
var stdin = process.openStdin();
stdin.on('data', parse);
var commands = {};
function parse(it) {
var parts = it.split(' ');
var commandIdx = Object.keys(commands).indexOf(parts[0]);
if (commandIdx > -1) {
commands[commandIdx].apply(null, parts.slice(1));
}
else {
@ralt
ralt / create-tags.sh
Created May 27, 2015 20:28
Create emacs ctags files for Platform.sh drupal projects
#!/bin/bash
find `pwd`/www/ -type f > /tmp/project-files
find `pwd`/repository -type f >> /tmp/project-files
ctags -eL /tmp/project-files \
--totals=yes \
--langmap=php:.engine.inc.module.theme.install.php \
--tag-relative=yes \
--PHP-kinds=+cdfi \
@ralt
ralt / linux.md
Last active August 29, 2015 14:22 — forked from Zirak/linux.md

In order (maybe). Some stuff are Arch specific.

Base system stuff

  • grub
  • os-prober

A decent shell and a way to talk to the world

  • zsh
  • grml-zsh-config
  • fish
@ralt
ralt / check-deb-match.sh
Created July 3, 2015 13:03
Check that 2 debian packages have the same files
#!/bin/bash
FIRST_TMP=$RANDOM
SECOND_TMP=$RANDOM
mkdir -p $FIRST_TMP $SECOND_TMP
cp $1 $FIRST_TMP
cd $FIRST_TMP
ar vx $1 > /dev/null