Skip to content

Instantly share code, notes, and snippets.

@benclark
benclark / nodequeue_create.php
Created September 21, 2012 18:25 — forked from brockboland/nodequeue_create.php
Drupal: Create a nodequeue if it doesn't exist already
drupal_load('module', 'nodequeue');
// Homepage Features
$queue = nodequeue_load_queue_by_name('homepage_features');
if (empty($queue)) {
$queue = new stdClass();
$queue->title = 'Homepage Features';
$queue->name = 'homepage_features';
$queue->size = 4;
$queue->owner = 'nodequeue';
@benclark
benclark / lighttpd-vhosts.pl
Created October 4, 2012 21:14
Lighttpd vhosts config script
#!/usr/bin/perl -wl
use strict;
use File::Glob ':glob';
my $sitesdir = shift || "/mnt/Sites/";
sleep 1 while (!(chdir($sitesdir)));
my @sites = bsd_glob('*/{repo,trunk}');
@benclark
benclark / apache_syslog.pl
Created October 24, 2012 14:01
Perl script that is capable of sending httpd logs to syslog
#!/usr/bin/perl
use Sys::Syslog qw( :DEFAULT setlogsock );
openlog('httpd', 'cons,pid', LOG_LOCAL0);
while ($log = <STDIN>) {
syslog(LOG_NOTICE, $log);
}
closelog
@benclark
benclark / gist:3948044
Created October 24, 2012 18:50
Bash function to go to a specified git repo in $HOME/Sites
# Go to a specified git repo in $HOME/Sites
repo() {
local reponame=$1
local jumpto_type=$2
local jumpto_which=$3
local basedir="$HOME/Sites/$reponame"
local cd_to
if [ -z $reponame ]; then
echo "usage: repo reponame [type [which]]"
@benclark
benclark / gist:3974821
Created October 29, 2012 16:50
Memcache config for settings.php (D6)
<?php
/**
* Memcache config
*/
// Check that one of the two memcache extensions are loaded.
if (extension_loaded('memcache') || extension_loaded('memcached')) {
if (!is_array($conf)) {
$conf = array();
@benclark
benclark / gist:4205910
Created December 4, 2012 16:36
Phoshare link-only backup of iPhoto library to Dropbox
#!/bin/sh
nice -n 20 /Applications/Phoshare.app/Contents/MacOS/Phoshare -o -d -u -l -e . --export ~/Dropbox/Photos/Phoshare\ Backup/
@benclark
benclark / theme_D6MODULE_table_form.php
Last active December 10, 2015 20:18
Theme a series of form elements into a table (Drupal 6)
<?php
/**
* Theme a series of form elements into a table (Drupal 6).
*/
function theme_D6MODULE_table_form($form) {
$header = array();
$rows = array();
foreach (element_children($form) as $i) {
@benclark
benclark / theme_D7MODULE_table_form.php
Created January 8, 2013 20:04
Theme a series of form elements into a table (Drupal 7)
<?php
/**
* Theme a series of form elements into a table (Drupal 7).
*/
function theme_D7MODULE_table_form($variables) {
$form = $variables['form'];
$header = array();
$rows = array();
@benclark
benclark / gist_tag.rb
Last active December 11, 2015 08:58 — forked from BinaryMuse/gist_tag.rb
# Gist tag Jekyll plugin
#
# From:
# http://brandontilley.com/2011/01/30/gist-tag-for-jekyll.html
require 'cgi'
require 'digest/md5'
require 'net/https'
require 'uri'
@benclark
benclark / D6MODULE_textarea_to_array.php
Created January 21, 2013 22:16
Example of how to take a textarea form element and explode it into an array before saving it to a variable via `system_settings_form()`.
<?php
/**
* @file
* Example of how to take a textarea form element and explode it into an array
* before saving it to a variable via `system_settings_form()`.
*/
/**
* Admin settings form.