Loads of misc updates

[syinit] / 11-pkgs-sy.el

diff --git a/11-pkgs-sy.el b/11-pkgs-sy.el
index b009153..b4520f7 100644 (file)
--- a/11-pkgs-sy.el
+++ b/11-pkgs-sy.el
@@ -1,11 +1,11 @@
 ;; 11-pkgs-sy.el --- Various XE Package Settings   -*- Emacs-Lisp -*-
 
-;; Copyright (C) 2007 - 2012 Steve Youngs
+;; Copyright (C) 2007 - 2013 Steve Youngs
 
 ;;     Author: Steve Youngs <steve@sxemacs.org>
 ;; Maintainer: Steve Youngs <steve@sxemacs.org>
 ;;    Created: <2007-12-02>
-;; Time-stamp: <Friday Jun 29, 2012 19:25:52 steve>
+;; Time-stamp: <Friday Aug 16, 2013 13:27:27 steve>
 ;;   Download: <http://bastard.steveyoungs.com/~steve/SXEmacs/inits/>
 ;;   HTMLised: <http://bastard.steveyoungs.com/~steve/SXEmacs/htmlinits/11-pkgs-sy.html>
 ;;   Git Repo: git clone http://git.sxemacs.org/syinit
@@ -92,9 +92,9 @@
 (global-set-key [XF86AudioMute] #'mpd-volume-mute/unmute)
 
 ;; Mpd frame props
-;(push (cons 'override-redirect t) mpd-dock-frame-plist)
-(push (cons 'left 1568) mpd-dock-frame-plist)
-(push (cons 'top 360) mpd-dock-frame-plist)
+(push (cons 'override-redirect t) mpd-dock-frame-plist)
+(push (cons 'left 1780) mpd-dock-frame-plist)
+(push (cons 'top 5) mpd-dock-frame-plist)
 (push (cons 'internal-border-width 4) mpd-dock-frame-plist)
 (push (cons 'border-width 1) mpd-dock-frame-plist)
 (push (cons 'border-color "red") mpd-dock-frame-plist)
@@ -230,8 +230,9 @@
 ;:  Comment or uncomment each line in the region.
 ;:  Comments are terminated on each line, even for syntax in which newline does
 ;:  not end the comment.  Blank lines do not get comments.
-(global-set-key '(control f12)  'comment-region)
-(global-set-key '(meta f12) 'uncomment-region)
+(require 'newcomment)
+(global-set-key '(control f12)  'comment-or-uncomment-region)
+(global-set-key '(meta f12) 'uncomment-or-uncomment-region)
 
 ;:*======================
 ;:* parens that mark sexpressions