Jorgen Schäfer jorgenschaefer
jorgenschaefer
/ p.py
Created
March 28, 2014 16:56
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
| m = re.match(r'^(?:\s*([0-9]+)\s*x\s+)?(.*)$', line) | |
| if m is None: | |
| continue | |
| quantity, typename = m.groups() | |
| if quantity is None: | |
| quantity = 1 | |
| ... |
jorgenschaefer
/ *scratch*.el
Created
March 15, 2014 18:26
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
| (let* ((x 1) (y 2)) ...) | |
| === | |
| (setq x-old x) | |
| (setq y-old y) | |
| (setq x 1) | |
| (setq y 2) | |
| ... | |
| (setq x x-old) |
jorgenschaefer
/ *scratch*.el
Created
February 16, 2014 10:55
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 foo () | |
| (interactive) ; To make it a command that can be bound to a key | |
| (string-rectangle ; Call this function | |
| (region-beginning) ; First arg: START | |
| (region-end) ; Second arg: END | |
| "ZZZ")) ; Third arg: STRING | |
| ;; More idiomatically: |
jorgenschaefer
/ *Compile-Log*.txt
Created
January 10, 2014 16:20
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
| Compiling no file at Fri Jan 10 17:20:03 2014 | |
| Leaving directory `/home/forcer/.emacs.d/elpa/magit-1.2.0' | |
| Compiling file /home/forcer/.emacs.d/elpa/magit-1.2.0/magit-bisect.el at Fri Jan 10 17:20:03 2014 | |
| Entering directory `/home/forcer/.emacs.d/elpa/magit-1.2.0/' | |
| magit-bisect.el:1:1:Error: Wrong type argument: listp, 769 | |
| Compiling file /home/forcer/.emacs.d/elpa/magit-1.2.0/magit-blame.el at Fri Jan 10 17:20:03 2014 | |
| magit-blame.el:34:1:Error: Wrong type argument: listp, 769 |
jorgenschaefer
/ *Compile-Log*.txt
Created
January 10, 2014 16:19
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
| Compiling no file at Fri Jan 10 17:18:59 2014 | |
| Leaving directory `/home/forcer/.emacs.d/elpa/magit-1.2.0' | |
| Compiling file /home/forcer/.emacs.d/elpa/magit-1.2.0/magit-bisect.el at Fri Jan 10 17:18:59 2014 | |
| Entering directory `/home/forcer/.emacs.d/elpa/magit-1.2.0/' | |
| magit-bisect.el:1:1:Error: Wrong type argument: listp, 769 | |
| Compiling file /home/forcer/.emacs.d/elpa/magit-1.2.0/magit-blame.el at Fri Jan 10 17:18:59 2014 | |
| magit-blame.el:34:1:Error: Wrong type argument: listp, 769 |
jorgenschaefer
/ tarifliche_einkommensteuer.js
Created
December 9, 2013 13:14
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
| /* Die tarifliche Einkommensteuer nach § 52 Abs. 41 EStG: | |
| * | |
| * (1) Die tarifliche Einkommensteuer bemisst sich nach dem zu | |
| * versteuernden Einkommen. Sie beträgt vorbehaltlich der §§ 32b, | |
| * 32d, 34, 34a, 34b und 34c jeweils in Euro für zu versteuernde | |
| * Einkommen | |
| * | |
| * 1. bis 8 130 Euro (Grundfreibetrag): | |
| * 0; | |
| * 2. von 8 131 Euro bis 13 469 Euro: |
jorgenschaefer
/ elpy.el
Created
November 28, 2013 14:50
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
| (with-help-window "*Elpy Error*" | |
| (with-current-buffer "*Elpy Error*" | |
| (view-mode 1) | |
| (let ((inhibit-read-only t)) | |
| (erase-buffer) | |
| (insert "There was an error initializing the Elpy backend,\n" | |
| "as the " missing-module " Python module was not found.\n" | |
| "\n" | |
| "Please install this module to use elpy.\n")) | |
| (pop-to-buffer (current-buffer)))) |
jorgenschaefer
/ check_server.py
Created
November 2, 2013 12:33
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
| #!/usr/bin/env python | |
| # Simple server cleanup script for Debian. | |
| # Author: Jorgen Schaefer <[email protected]> | |
| # License: GPL | |
| # Takes a list of wanted packages (comments with # allowed), marks | |
| # everything else as automatically installed, uses apt-get autoremove | |
| # to clean up the packages, and then checks whether any installed |
jorgenschaefer
/ elisp-check.el
Created
October 26, 2013 23:56
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 elisp-check () | |
| "Check the current buffer for possible elisp problems. | |
| This actually byte compiles the buffer, but throws away the | |
| result and keeps only the warnings." | |
| (interactive) | |
| (let ((lisp (buffer-substring-no-properties (point-min) | |
| (point-max)))) | |
| (with-temp-buffer | |
| (setq buffer-file-coding-system nil) |
jorgenschaefer
/ elisp-check.el
Created
October 25, 2013 10:00
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 elisp-check () | |
| "Check the current buffer for possible elisp problems. | |
| This actually byte compiles the buffer, but throws away the | |
| result and keeps only the warnings." | |
| (interactive) | |
| (let ((lisp (buffer-substring-no-properties (point-min) | |
| (point-max)))) | |
| (with-temp-buffer | |
| (setq buffer-file-coding-system nil) |