--- a/.emacs-my Mon Nov 14 19:20:36 2011 +0200
+++ b/.emacs-my Mon Nov 14 19:20:47 2011 +0200
@@ -62,6 +62,8 @@
;; (setq user-mail-address "gavenkoa@gmail.com")
;; (setq user-nick "gavenkoa")
+(unless (and (boundp 'user-nick) (stringp user-nick))
+ (setq user-nick (user-login-name)) )
(setenv "ORGANIZATION" (concat user-full-name " <" user-mail-address ">"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
@@ -1074,6 +1076,14 @@
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+(message "figlet")
+
+(defun my-figlet-region (&optional b e)
+ (interactive "r")
+ (shell-command-on-region b e "figlet" (current-buffer) t)
+ (comment-region (mark) (point)))
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(message "remember-mode")
(when (>= emacs-major-version 23)
@@ -1825,11 +1835,11 @@
(defun my-c-mode-common-hook ()
;; Automatically inserte newlines after special characters such as brace, comma, semi-colon, and colon.
- (c-toggle-auto-newline 1)
+ (c-toggle-auto-newline -1)
;; Delete all preceding whitespace by DEL.
(c-toggle-hungry-state -1)
;; Auto indent after typing colon according to `c-hanging-colons-alist'.
- (c-toggle-electric-state -1)
+ (c-toggle-electric-state 1)
)
(add-hook 'c-mode-common-hook 'my-c-mode-common-hook)
--- a/stmcrblog.sh Mon Nov 14 19:20:36 2011 +0200
+++ b/stmcrblog.sh Mon Nov 14 19:20:47 2011 +0200
@@ -30,7 +30,9 @@
echo '<ul>'
- sed -e 's|^\([[:digit:]-]\+\) \([[:digit:]:]\+\) \(.*\)| <li><span style="color: green;">\1 \2</span> \3</li>|'
+ sed \
+ -e 's|^\([[:digit:]-]\+[02468]\) \([[:digit:]:]\+\) \(.*\)| <li><span style="color: green;">\1 \2</span> \3</li>|' \
+ -e 's|^\([[:digit:]-]\+[13579]\) \([[:digit:]:]\+\) \(.*\)| <li><span style="color: blue;">\1 \2</span> \3</li>|'
echo '</ul>'