alphapapa

;;;;;; Fix Helm org tag completion
;; From Anders Johansson <https://groups.google.com/d/msg/emacs-helm/tA6cn6TUdRY/G1S3TIdzBwAJ>

;; This works great!  He posted it on 3 Mar 2016, on a thread that was
;; started in Oct 2013.  He also posted this message on 2 Apr 2014,
;; maybe an earlier attempt at a solution:
;; <http://article.gmane.org/gmane.emacs.orgmode/84495> I've just
;; tidied it up a bit and adjusted the prompt.

(add-to-list 'helm-completing-read-handlers-alist '(org-capture . aj/org-completing-read-tags))

alphapapa

(defun org-agenda-subtree-or-region (prefix)
  "Display an agenda view for the current subtree or region.
With prefix, display only TODO-keyword items."
  (interactive "p")
  (let (header)
    (if (use-region-p)
        (progn
          (setq header "Region")
          (put 'org-agenda-files 'org-restrict (list (buffer-file-name (current-buffer))))
          (setq org-agenda-restrict (current-buffer))

alphapapa

#!/bin/bash

less_command='| less $less_no_init -aiF -Ps"Manual page\: $man_page (?ltline %lt?L/%L.:byte %bB?s/%s..? (END):?pB %pB\%..)"'

# Get section
if [[ $1 =~ [0-9]+ ]]
then
    section=$1
    shift
fi

jordonbiondo

;; FIFO queue implementation using cyclic doubly linked lists
;;
;; This data structure is a bit overkill for a queue,
;; but it has many other uses

;; a doubly linked list cell look like (val . (prev-cell next-cell))
;;
;; a FIFO queue object looks like ('fifo . cyclic-doubly-linked-list)
;;
;; An empty FIFO queue would be: ('fifo . nil)

0XDE57

ABOUT

about:config settings to harden the Firefox browser. Privacy and performance enhancements.
To change these settings type 'about:config' in the url bar. Then search the setting you would like to change and modify the value. Some settings may break certain websites from functioning and rendering normally. Some settings may also make firefox unstable. I am not liable for any damages/loss of data.

Not all these changes are necessary and will be dependent upon your usage and hardware. Do some research on settings if you don't understand what they do. These settings are best combined with your standard privacy extensions (HTTPS Everywhere No longer required: Enable HTTPS-Only Mode, NoScript/Request Policy, uBlock origin, agent spoofing, Privacy Badger etc), and all plugins set to "Ask To Activate".

alphapapa

#!/usr/bin/env python

import datetime, json, sys

def formatEntry(entry):
    return "%s (%s) (%s)" % (entry['title'].encode('utf8')
                                 if entry.has_key('title') else "<untitled>",
                             entry['url'].encode('utf8'),
                             datetime.datetime.fromtimestamp(
                                   int(tab['lastAccessed']) / 1000).strftime('%Y-%m-%d %H:%M:%S'))

dannguyen

Use wget to mirror a single page and its visible dependencies (images, styles)

Graphic via State of Florida CFO Vendor Payment Search (flair.myfloridacfo.com)

This is a quick command I use to snapshot webpages that have a fun image I want to keep for my own collection of WTFViz. Why not just right-click and save the image? Oftentimes, the webpage in which the image is embedded contains necessary context, such as captions and links to important documentation just incase you forget what exactly that fun graphic was trying to explain.

alphapapa

(defun my/python-mode-outline-hook ()
  (setq outline-level 'my/python-outline-level)

  (setq outline-regexp
	(rx (or
	     ;; Commented outline heading
	     (group
	      (* space)	 ; 0 or more spaces
	      (one-or-more (syntax comment-start))
	      (one-or-more space)

alphapapa

(defun python-mode-outline-hook ()
  (setq outline-level 'python-outline-level)

  (setq outline-regexp
	(rx (or
	     ;; Commented outline heading
	     (group
	      (* space)	 ; 0 or more spaces
	      (one-or-more (syntax comment-start))
	      (one-or-more space)

sprig

(defun kk/run-with-no-helm (orig-func &rest args)
  "Run a function without helm completion."
  (if (boundp 'helm-mode)
      (let ((orig-helm-mode helm-mode))
	(unwind-protect
	    (progn
	      (helm-mode 0)
	      (apply orig-func args)
	      )
	  (helm-mode (if orig-helm-mode 1 0))))