Skip to content

Instantly share code, notes, and snippets.

tons of work

Ag Ibragimov agzam

tons of work
Block or report user

Report or block agzam

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
View keybase.md

Keybase proof

I hereby claim:

  • I am agzam on github.
  • I am agzam (https://keybase.io/agzam) on keybase.
  • I have a public key whose fingerprint is E099 A300 39C1 2143 0579 BA65 CFE1 2444 AF47 BD1D

To claim this, I am signing this object:

View entry.cljs
(ns finops-admin.re-frame.components.common.navbar.entry
""
(:require [cljs.spec.alpha :as s]
[finops-admin.auth :as auth]
[finops-admin.page :as page]
[finops-admin.re-frame.components :as components]
[finops-admin.re-frame.components.common.navbar2.fc :as fc]
[finops-admin.utils :as utils]
[goog.dom :as dom]
[re-frame.core :as rf]
@agzam
agzam / sdcv-dicts.sh
Last active Jul 7, 2018
download and extract selected sdcv dictionaries
View sdcv-dicts.sh
DICTS="http://download.huzheng.org/dict.org/stardict-dictd_www.dict.org_gcide-2.4.2.tar.bz2
http://download.huzheng.org/dict.org/stardict-dictd-moby-thesaurus-2.4.2.tar.bz2
http://download.huzheng.org/dict.org/stardict-EnglishEtymology-2.4.2.tar.bz2"
mkdir -p ~/.stardict/dic
mkdir -p ~/Downloads/dictionary/extracted
cd ~/Downloads/dictionary
for dic in $DICTS; do
curl -o ~/Downloads/dictionary/dict.tar.bz2 $dic
@agzam
agzam / all ex commands.org
Last active Jul 22, 2019
All ex commands
View all ex commands.org
e[dit]evil-edit
w[rite]evil-write
wa[ll]evil-write-all
sav[eas]evil-save
r[ead]evil-read
b[uffer]evil-buffer
bn[ext]evil-next-buffer
bp[revious]evil-prev-buffer
bN[ext]bprevious
sb[uffer]evil-split-buffer
@agzam
agzam / js_parser.clj
Created Sep 7, 2019 — forked from borkdude/js_parser.clj
Parse JavaScript in Clojure using the Google Closure Compiler
View js_parser.clj
#!/bin/sh
#_(
"exec" "clojure" "-Sdeps" "{:deps {org.clojure/clojurescript {:mvn/version \"1.10.520\"}}}" "$0" "$@"
)
;; running js_parser.clj "function foo(x) { var y = x + 1; }" will print:
;; [{:type :function, :name "foo", :body [{:variable-statement [{:lvalue "y", :initializer {:type :binary-op, :left "x", :operator "+", :right "1"}}]}], :params ["x"]}]
@agzam
agzam / diff-buffers.el
Last active Nov 13, 2019
Diff two buffers
View diff-buffers.el
(defun diff-buffers (buffer-A buffer-B)
"Diff two buffers."
(interactive
(let* ((only-two? (eq 2 (count-windows)))
(wins (sort (window-list)
(lambda (a b) (< (window-use-time a)
(window-use-time b)))))
(b1 (if only-two?
(window-buffer (first wins))
(read-buffer "Buffer A to compare")))
@agzam
agzam / toggle-frame-maximized-undecorated.el
Last active Dec 18, 2019
Maximized undecorated (title-less) Emacs frame with no gaps around
View toggle-frame-maximized-undecorated.el
(defun toggle-frame-maximized-undecorated ()
(interactive)
(let* ((frame (selected-frame))
(on? (and (frame-parameter frame 'undecorated)
(eq (frame-parameter frame 'fullscreen) 'maximized)))
(geom (frame-monitor-attribute 'geometry))
(x (first geom))
(y (second geom))
(display-height (first (last geom))))
(if on?
@agzam
agzam / find-message.el
Last active Jan 5, 2020
Mu4e action to find a message in mailing list archives
View find-message.el
;; If you subscribed to mailing list(s) in gnu.org or googlegroups.com
;; and using mu4e as your mailing app, very often you need to
;; find a message in lists.gnu.org/archive or googlegroups.com
;;
;; For example, when you don't have the context of a particular thread
;; and all prior messages got deleted locally.
;;
;; This mu4e action allows you
;; to quickly find selected email post in the archive
;; and open in the browser
You can’t perform that action at this time.