This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
<html> | |
<style> | |
@keyframes liftoff { | |
0% { | |
clip-path: inset(0px 200px 0px 0px); | |
} | |
10% { | |
clip-path: inset(0px 0px 0px 0px); | |
} | |
100% { |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
* Foot pedal prototype | |
*/ | |
#include <HID.h> | |
#include <Keyboard.h> | |
#define PIN_CTRL 2 | |
#define PIN_ALT 3 | |
#define PIN_SHIFT 4 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(save-excursion | |
(setq xx-overlay (make-overlay (1+ (line-beginning-position)) (line-end-position) | |
nil t)) | |
(overlay-put xx-overlay 'wrap-prefix t) | |
(overlay-put xx-overlay 'before-string | |
(propertize "o" 'display (list (list 'margin 'right-margin) | |
"Overlay text") | |
))) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
export CRED=root@id | |
SSH=$(whereis ssh | awk '{print $2}') | |
JQ=$(whereis jq | awk '{print $2}') | |
SCP=$(whereis scp | awk '{print $2}') | |
if [ -z "$SSH" ]; then | |
echo "Unable to find ssh" 1>&2 | |
return 1 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#include <sys/types.h> | |
#include <sys/stat.h> | |
#include <sys/time.h> | |
#include <stdio.h> | |
#include <stdlib.h> | |
#include <fcntl.h> | |
#include <errno.h> | |
#include <unistd.h> | |
#include <syslog.h> | |
#include <string.h> |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
export NFS_MOUNT_PATH="$HOME/titan" # colon-separated list | |
export BACKUP_PS1= | |
function avoid_gitps_on_nfs() { | |
IFS=":" | |
set $NFS_MOUNT_PATH | |
for var in $NFS_MOUNT_PATH; do | |
if [ -n "`echo \"^$PWD\" | grep -e $var`" ]; then | |
export BACKUP_PS1=$PS1 | |
export PS1=$NFS_PS1 |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(require 'auto-complete) | |
(defvar ac-emacs-lisp-sources | |
'(ac-source-symbols)) | |
(defvar ac-emacs-lisp-features nil) | |
(defvar ac-source-emacs-lisp-features | |
'((init | |
. (lambda () | |
(unless ac-emacs-lisp-features |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun my:background-at-point () | |
(let* ((face (or (get-char-property (point) 'read-face-name) | |
(get-char-property (point) 'face))) | |
(bg (cond ((and face (symbolp face)) | |
(condition-case nil | |
(face-background face nil 'default) | |
(error (or (face-background face) | |
(cdr (assq 'background-color (frame-parameters))))))) | |
((consp face) | |
(cond ((memq 'background-color face) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; handle left click on left window margin & return text in position | |
(global-set-key (kbd "<left-margin> <mouse-1>") (lambda (p) (interactive "e") | |
(message "%S" (posn-string (car (cdr p)))))) | |
;; unset key bind | |
(global-unset-key (kbd "<left-margin> <mouse-1>")) | |
;; make overlay on window start pos & insert propertized text | |
;; mouse-face doesn't work but help echo works..... weird.... | |
(let ((str (propertize "hello" 'face '(:foreground "cyan") 'help-echo "mouse-1: say hello" 'mouse-face 'highlight))) | |
(setq ov (make-overlay (window-start) (window-start))) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
* RPM C API test based on : | |
* http://rpm5.org/docs/api/rpminstall_8c-source.html#l00287 | |
*/ | |
#include <stdio.h> | |
#include <stdlib.h> | |
#include <unistd.h> | |
#include <fcntl.h> | |
#include <sys/stat.h> | |
#include <rpm/rpmlib.h> |
NewerOlder