Commit 0ba227fb authored by yPhil's avatar yPhil

Emacs: Switch / navigate buffers with M-left & right

parent 9855f35d
......@@ -30,6 +30,9 @@ alias s="cd ~/src"
alias t="cd ~/tmp"
alias v="gpicview"
alias xcopy="xclip -selection c"
alias xpaste="xclip -selection c -o"
HEADER="\n####"
function color() {
......@@ -270,6 +273,37 @@ px-cleanup-filenames () {
find -type f | rename -v 's/_-_/-/g'
}
px-image-orientation () {
for i in * ; do
RESULT=$(identify -format '%[fx:(h>w)]' $i)
if [[ $RESULT = *"0"* ]] ; then
# echo "$i is HORIZONTAL (Landscape)"
else
echo "$i is VERTICAL (Portrait)"
# convert $i -rotate 90 $i
fi
done
}
px-gif-optimize-directory () {
for i in *.gif ; do
RESULT=$(exiftool -m -q -q -comment $i | cut -f2 -d ":" | awk '{$1=$1}1')
if [[ $RESULT = *"Optimized"* ]] ; then
echo "$i is ALREADY OPTIMIZED: $RESULT"
else
echo "Optimizing $i: $(stat -c%s $i)"
gifsicle -O3 --lossy=80 --colors 256 $i -o $i
exiftool -overwrite_original_in_place -comment="Optimized" $i
echo "$i is NOW OPTIMIZED: $(stat -c%s $i)"
fi
done
}
px-reorder-filenames () {
digits=%04d.%s
......@@ -420,6 +454,12 @@ git commit -m 'Revert to 56e05fced'
# Update working copy to reflect the new commit
git reset --hard
# Unison
1-Install SSHDroid
2-# mkdir -p ~/tmp/mnt/m_external_sd
2-# sshfs root@192.168.1.100:/mnt/m_external_sd/ ~/tmp/mnt/m_external_sd -p 1090
3-# unison -fat -batch ~/tmp/x ~/tmp/mnt/m_external_sd/tmp/x
## Use px-notes \"this is a new note\" to add a note
"
else
......
......@@ -514,8 +514,8 @@
;; :disabled t
:ensure t
:bind
("<C-S-iso-lefttab>" . tabbar-backward)
("<C-tab>" . tabbar-forward)
("<M-left>" . tabbar-backward)
("<M-right>" . tabbar-forward)
:config
(set-face-attribute
......@@ -777,8 +777,8 @@ mouse-3: Open %S in another window"
(let ((selection (buffer-substring-no-properties start end)))
(px-flash-region start end)
(browse-url (concat "https://google.com/?q="
(url-hexify-string selection) "!g"))))
(browse-url (concat "https://duckduckgo.com/?q="
(url-hexify-string selection)))))
(defun px-select-text-in-quotes ()
"Select text between the nearest left and right delimiters."
......@@ -869,5 +869,5 @@ mouse-3: Open %S in another window"
'(org-support-shift-select (quote always))
'(package-selected-packages
(quote
(ag ensime scala-mode flymake-jslint flycheck-jslint mustache-mode flymake-json projectile handlebars-mode json-mode yasnippet which-key web-mode use-package undo-tree try tabbar redshank rainbow-mode php-mode paredit package-build moe-theme markdown-mode magit js2-mode ivy-hydra iedit flycheck-package flycheck-cask emmet-mode elisp-slime-nav counsel beacon avy aggressive-indent)))
(flymake-jshint ag ensime scala-mode flymake-jslint flycheck-jslint mustache-mode flymake-json projectile handlebars-mode json-mode yasnippet which-key web-mode use-package undo-tree try tabbar redshank rainbow-mode php-mode paredit package-build moe-theme markdown-mode magit js2-mode ivy-hydra iedit flycheck-package flycheck-cask emmet-mode elisp-slime-nav counsel beacon avy aggressive-indent)))
'(tabbar-separator (quote (0.2))))
This diff is collapsed.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment