(when (ff/load-or-alert "lookup-dict" t)
(define-key global-map [(control \?)] 'lookup-dict))
+;; (defun ff/generate-password () (interactive)
+ ;; (let ((c "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_-"))
+ ;; (nth (random (length c)) c))
+
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Automatization of things I do often
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(interactive)
(let ((flag-name (replace-regexp-in-string
"[\. \(\)]" "_"
- (upcase (file-name-nondirectory (buffer-name))))))
+ (upcase (file-name-nondirectory (buffer-file-name))))))
(goto-char (point-max))
(insert "\n#endif\n")
(goto-char (point-min))
"-framedrop"
"-zoom"
"-subfont-osd-scale" "3"
+ "-stop-xscreensaver"
;; "-osdlevel" "3"
)
media/mplayer/timing-request-period 5.0