dired-toggle-read-only
Вторая версия костыля для emacs-jabber чтобы быстро отвечать на посты и цомменты.
Теперь повторный вызов будет вставлять более дальние цоменты.
Костыль для емакса чтобы в конец буфера вставлялся первый встретившийся выше номер поста или комента (вида #foo/bar).
(defun do-reply-to-post-comment ()
(if (re-search-backward
"^#[0-9a-zA-Z]+\(/[0-9a-zA-Z]+\)?" nil t 1)
(progn
(end-of-buffer)
(insert-buffer-substring-no-properties (current-buffer)
(match-beginning 0) (match-end 0))
(insert " "))
(message "No comments found")))
(defun reply-to-post-comment()
(interactive)
(save-excursion
(do-reply-to-post-comment))
(end-of-buffer))
(global-set-key (kbd "C-c r") 'reply-to-post-comment)
<dca> guys
<dca> why doesn't (re-search-backward "#[0-9a-zA-Z]+(/[0-9a-zA-Z]+)?" nil
t) match something like #2638782/21 or #2639019
<dca> but this works M-x re-search-backward #[0-9a-zA-Z]+(/[0-9a-zA-Z]+)?
Интересно, насколько сложно запилить какой-то бутстрап-скрипт, который не только на сервер емакс ставит, но еще и для него настройку делает для питонопрограммирования по типу pep8/pyflakes. А то чувствую сейчас начну фигачить неслабо прямо в сервере (статистику всякую из продакшна выгребать).
емаксоюзеры, настало время нам объединиться и сделать поддержку libotr в jabber.el
Предлагаю начать с допилииванию биндингов к libotr.
Я взял древний заброшеный emacs-otr, осмотрел его и добавил костылей и пустых функий для того, чтобы это хозяйство компилилось с libotr5.
https://github.com/4DA/emacs-otr
@a13, @Avatar, @Whitesquall, @kb, @cbeta и все остальные, подключайтесь.
Лайки, репосты, ретвиты приветствуется.
Достали ошибки вида
dframe-attached-frame: Wrong type argument: framep, macro
Как починить? На работу не влияет, но подбешивает.
Подхачил моду cdb-gud, чтобы можно было подключаться к удаленной сессии windbg.
Олсо, добаваил парсер выхлопа kd.exe чтобы показывался call stack в speedbar и gud показывал исходники (если есть символы).
Показать man функции, которая щас под курсором.
(require 'thingatpt)
(defun man-at-point ()
(interactive)
(let ((sym (symbol-at-point)))
(message (format "Showing man for %s ..." sym))
(man (symbol-name sym))))
(defun my-c-stuff ()
;; blah blah
(local-set-key (kbd "C-c C-m") 'man-at-point))
(add-hook 'c-mode-common-hook 'my-c-stuff)
Наконец-то кто-то сделал история ввода в jabber-el!
Рубрика "Как навелосипедить хуйню за 30 минут" от Сохатского продолжается.
В этот раз досталось несчастному емаксу.
Совсем ебанулся и поменял местами Shift_R и Control_R
/home/dc/.emacs.d % wc -l configs/*.el
115 configs/bindings-config.el
183 configs/coding-config.el
5 configs/colors-config.el
16 configs/cygwin-config.el
52 configs/dired-config.el
158 configs/emms-config.el
299 configs/erc-config.el
17 configs/git-config.el
9 configs/gui-config.el
30 configs/ibuffer-config.el
46 configs/ido-config.el
127 configs/jabber-config.el
7 configs/lj-config.el
216 configs/misc-config.el
23 configs/modeline-config.el
7 configs/notes-config.el
5 configs/perforce-config.el
25 configs/shells-config.el
1 configs/sunrise-config.el
7 configs/twitter-config.el
18 configs/w3m-config.el
158 configs/wanderlust-config.el
18 configs/wiki-config.el
25 configs/windows-config.el
1567 total
Думал, что будет больше.
А у тебя скока, юзернейм?