fspeech

## hs-cycle.el
;; I bind my command to C-<tab>
;; (define-key hs-minor-mode-map (kbd "C-<tab>")  'hs-cycle)

(defun hs-cycle (&optional arg)
  "Visibility cycling for hs-minor-mode, inspired by outline-cycle from
outline-magic.el (https://github.com/tj64/outline-magic).
When repeatedly called we cycle through three states:
 1. HIDE: Show only headlines in the current context.
 2. OVERVIEW: Expand one level below HIDE to show more details.
 3. SHOW: Show everything in the current context."

## query.sql
select repository_name, count(repository_name) as pushes, repository_description, repository_url
from [githubarchive:github.timeline]
where type="PushEvent"
  and repository_language="Emacs Lisp"
  and parse_utc_usec(created_at) >= parse_utc_usec('2014-01-01 00:00:00')
group by repository_name, repository_description, repository_url
order by pushes desc
limit 100
	;; I bind my command to C-<tab>
	;; (define-key hs-minor-mode-map (kbd "C-<tab>") 'hs-cycle)

	(defun hs-cycle (&optional arg)
	"Visibility cycling for hs-minor-mode, inspired by outline-cycle from
	outline-magic.el (https://github.com/tj64/outline-magic).
	When repeatedly called we cycle through three states:
	1. HIDE: Show only headlines in the current context.
	2. OVERVIEW: Expand one level below HIDE to show more details.
	3. SHOW: Show everything in the current context."
	select repository_name, count(repository_name) as pushes, repository_description, repository_url
	from [githubarchive:github.timeline]
	where type="PushEvent"
	and repository_language="Emacs Lisp"
	and parse_utc_usec(created_at) >= parse_utc_usec('2014-01-01 00:00:00')
	group by repository_name, repository_description, repository_url
	order by pushes desc
	limit 100