! --- Wily things ---
-wily*p9font: FIXED
-wily*font: FIXED
-wily*fixed: FIXED
+wily*p9font: FIXED
+wily*font: FIXED
+wily*fixed: FIXED
! --- Edwin ---
XTerm*eightBitInput: true
XTerm*VT100*translations: #override \
- <Btn4Down>: scroll-back(1,halfpage) \n\
- <Btn5Down>: scroll-forw(1,halfpage)
+ <Btn4Down>: scroll-back(1,halfpage) \n\
+ <Btn5Down>: scroll-forw(1,halfpage)
! --- XConsole settings ---
xvncviewer*shareDesktop: true
xvncviewer*desktop.translations: #override\n\
- <Key>F8: SendRFBEvent()\n\
- !Ctrl<Key>Escape: ShowPopup()
+ <Key>F8: SendRFBEvent()\n\
+ !Ctrl<Key>Escape: ShowPopup()
! --- Ytalk settings ---
[ -d $i ] || continue
case "X$val" in
X)
- val=$i
- continue
- ;;
+ val=$i
+ continue
+ ;;
X$i)
continue
;;
__mdw_conf () {
local var=$1
val=`sed -n "
- /^[ ]*$var[ ]*=[ ]*\(\|.*[^ ]\)[ ]*$/ {
+ /^[ ]*$var[ ]*=[ ]*\(\|.*[^ ]\)[ ]*$/ {
s//\1/; p; q
}
" ${MDWCONF-$HOME/.mdw.conf}`
if [ -z "$__mdw_bashrc" ] && [ "$__mdw_force_secure_session" = "yes" ] ||
( tty="`tty`" devtty="(/dev/)?${tty#/dev/}"
{ { { [ -e /etc/securetty ] && sectty=/etc/securetty; } ||
- { [ -e /etc/securettys ] && sectty=/etc/securettys; }; } &&
+ { [ -e /etc/securettys ] && sectty=/etc/securettys; }; } &&
egrep "$devtty" $sectty >/dev/null; } ||
{ [ -e /etc/default/login ] &&
egrep "^CONSOLE=$devtty" /etc/default/login >/dev/null; } ||
PS2="> "
PS4="+ "
else
-
+
case "$TERM" in
linux*|screen*|xterm*|vt100*)
bold='\[\e[1m\]' unbold='\[\e[m\]' nl='\[\r\]' ;;
left="«" right="»"
else
case $USER in
- mdw|mwooding)
+ mdw|mwooding)
u="" left="[" right="]"
;;
*)
if [ "$__mdw_tty" = "`tty`" ]; then
left="<" right=">"
else
- export __mdw_tty="`tty`"
+ export __mdw_tty="`tty`"
fi
fi
shopt -s sourcepath
# --- Set the CDPATH ---
-#
+#
# CDPATH=~/src:/usr/src:/usr/lib:/usr/share
# dots=..
# i=6
continue
;;
--)
- shift
+ shift
break
;;
[-+]*)
- ;;
+ ;;
*)
- break
+ break
;;
esac
hack=${arg#[+-]}
}
case "$arg,$force,:$PATH:" in
-*,*,*:"$dir":*)
- path-remove path "$dir"
+ path-remove path "$dir"
;;
+*,t,*:"$dir":*)
- path-remove path "$dir"
+ path-remove path "$dir"
path-add path "$dir"
;;
+*,nil,*:"$dir":*)
- ;;
+ ;;
+*,*)
- path-add path "$dir"
+ path-add path "$dir"
;;
esac
shift
# Background color codes:
# 40=black 41=red 42=green 43=yellow 44=blue 45=magenta 46=cyan 47=white
NORMAL 00 # global default, although everything should be something.
-FILE 00 # normal file
-DIR 01;36 # directory
-LINK 36 # symbolic link
+FILE 00 # normal file
+DIR 01;36 # directory
+LINK 36 # symbolic link
FIFO 32 # pipe
SOCK 01;32 # socket
BLK 01;35 # block device driver
-CHR 35 # character device driver
+CHR 35 # character device driver
ORPHAN 40;31;01 # symlink to nonexistent file
# This is for files with execute permission:
;;; it under the terms of the GNU General Public License as published by
;;; the Free Software Foundation; either version 2 of the License, or
;;; (at your option) any later version.
-;;;
+;;;
;;; This program is distributed in the hope that it will be useful,
;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;;; GNU General Public License for more details.
-;;;
+;;;
;;; You should have received a copy of the GNU General Public License
;;; along with this program; if not, write to the Free Software Foundation,
;;; Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
(interactive)
(save-excursion
(or arg (progn
- (goto-char (point-max))
+ (goto-char (point-max))
(insert "\nNP: ")
- (insert-file np-file)))))
+ (insert-file np-file)))))
(trap
(require 'tramp)
(list (concat "\\<\\(\\~\\|\\)"
"\\(0\\(\\([wW]\\|\\)[xX][0-9a-fA-F]+\\|"
- "[wW][0-9]+\\)\\|"
- "\\([0-9]+\\(\\.[0-9]+\\|\\)"
- "\\([eE]\\(\\~\\|\\)"
- "[0-9]+\\|\\)\\)\\)")
+ "[wW][0-9]+\\)\\|"
+ "\\([0-9]+\\(\\.[0-9]+\\|\\)"
+ "\\([eE]\\(\\~\\|\\)"
+ "[0-9]+\\|\\)\\)\\)")
'(0 mdw-number-face))
;; --- And anything else is punctuation ---
;; --- Handle @/.../ for italics ---
;; (list "\\(@/\\)\\([^/]*\\)\\(/\\)"
- ;; '(1 font-lock-keyword-face)
- ;; '(3 font-lock-keyword-face))
+ ;; '(1 font-lock-keyword-face)
+ ;; '(3 font-lock-keyword-face))
;; --- Handle @*...* for boldness ---
;; (list "\\(@\\*\\)\\([^*]*\\)\\(\\*\\)"
- ;; '(1 font-lock-keyword-face)
- ;; '(3 font-lock-keyword-face))
+ ;; '(1 font-lock-keyword-face)
+ ;; '(3 font-lock-keyword-face))
;; --- Handle @`...' for literal syntax things ---
;; (list "\\(@`\\)\\([^']*\\)\\('\\)"
- ;; '(1 font-lock-keyword-face)
- ;; '(3 font-lock-keyword-face))
+ ;; '(1 font-lock-keyword-face)
+ ;; '(3 font-lock-keyword-face))
;; --- Handle @<...> for nonterminals ---
;; (list "\\(@<\\)\\([^>]*\\)\\(>\\)"
- ;; '(1 font-lock-keyword-face)
- ;; '(3 font-lock-keyword-face))
+ ;; '(1 font-lock-keyword-face)
+ ;; '(3 font-lock-keyword-face))
;; --- Handle other @-commands ---
;; (list "@\\([^a-zA-Z]\\|[a-zA-Z]*\\)"
- ;; '(0 font-lock-keyword-face))
+ ;; '(0 font-lock-keyword-face))
;; --- Make sure we get comments properly ---
'(2 font-lock-string-face))
(list (concat "^\\([ \t]*#[ \t]*\\(\\("
preprocessor-keywords
- "\\)\\>\\|[0-9]+\\|$\\)\\)")
+ "\\)\\>\\|[0-9]+\\|$\\)\\)")
'(1 font-lock-keyword-face)))
message-mode-keywords)))
(turn-on-font-lock-if-enabled)
/*
* Global button bindings... specially named actionclass that applies to
* all client windows - so you can bind "alt - left click" to move the
- * window, raise it or something....
+ * window, raise it or something....
*/
__ACLASS __BGN
******************************************************************************
*
* Some Keys you can use to bind to (mainly standard English PC keyboard here)
-* This is a SMALL list to make this file readable. it in no way lists ALL
+* This is a SMALL list to make this file readable. it in no way lists ALL
* possible keys that can be bound. This is just the useful keys from a normal
* PC-style 101 key keyboard.
*
*/
__NAME KEYBINDINGS
__TYPE __TYPE_GLOBAL
-/*
+/*
* The following key should be pretty self explanitory, but you should
* really see how the Keysym is set. in your keysym.h file in your X11
* distribution
*/
__KEY Home
-/*
+/*
* Can I use this with any modifier? (default is no)
*/
__MODIFIER_KEY __CTRL_ALT
-/*
+/*
* you can also use modifier to specify a specific mod mask (alt,ctrl,qshift,etc)
*/
__EVENT __KEY_PRESS
("ftp" . ,proxy)
("gopher" . ,proxy))))
(setq url-cookie-untrusted-urls '("."))
-
+
(setq browse-url-browser-function (mdw-good-url-browser)
browse-url-mozilla-program "firefox")
<Eterm-0.8>
# ^- This must be the first line of any Eterm config file!
# Format is: <Eterm-VERSION> where VERSION is replaced by
-# the version it was written for,
-# minus the "DR-" if any.
+# the version it was written for,
+# minus the "DR-" if any.
#
# This is a sample Eterm config file. It should be placed in
# ~/.Eterm/themes/Eterm/MAIN and modified to suit your needs
# The colors below are taken from Rasterman's .Xdefaults file. They are intended to
# display ANSI art properly when combined with a good ANSI-art font (like vga or
# Rasterman's nexus font).
- color 0 #000000
- color 1 #aa0000
- color 2 #008800
- color 3 #aa5522
- color 4 #0000cc
- color 5 #aa00aa
- color 6 #00aaaa
- color 7 #dddddd
- color 8 #444444
- color 9 #ff4444
+ color 0 #000000
+ color 1 #aa0000
+ color 2 #008800
+ color 3 #aa5522
+ color 4 #0000cc
+ color 5 #aa00aa
+ color 6 #00aaaa
+ color 7 #dddddd
+ color 8 #444444
+ color 9 #ff4444
color 10 #44ff44
color 11 #ffff44
color 12 #4466ff
state normal
color #000000 #d0d0d0
end image
-
+
# menu_text black
# scrollbar #d0d0d0
begin attributes
# Geometry == widthxheight+x_offset+y_offset, offsets from top left
-# if +, bottom right if -
+# if +, bottom right if -
# geometry 132x50+100+100
title Eterm
name %appname()
/*
* Global button bindings... specially named actionclass that applies to
* all client windows - so you can bind "alt - left click" to move the
- * window, raise it or something....
+ * window, raise it or something....
*/
__ACLASS __BGN
******************************************************************************
*
* Some Keys you can use to bind to (mainly standard English PC keyboard here)
-* This is a SMALL list to make this file readable. it in no way lists ALL
+* This is a SMALL list to make this file readable. it in no way lists ALL
* possible keys that can be bound. This is just the useful keys from a normal
* PC-style 101 key keyboard.
*
*/
__NAME KEYBINDINGS
__TYPE __TYPE_GLOBAL
-/*
+/*
* The following key should be pretty self explanitory, but you should
* really see how the Keysym is set. in your keysym.h file in your X11
* distribution
*/
__KEY Home
-/*
+/*
* Can I use this with any modifier? (default is no)
*/
__MODIFIER_KEY __CTRL_ALT
-/*
+/*
* you can also use modifier to specify a specific mod mask (alt,ctrl,qshift,etc)
*/
__EVENT __KEY_PRESS
echo " done."
fi
done
-echo " all done."
+echo " all done."
### Find out how to fetch things over the net
$echon "Finding URL fetcher:$echoc"
fi
done
-echo " all done."
+echo " all done."
### Install some more complicated programs
echo "Installing packages..."
)
fi
done
-echo " all done."
+echo " all done."
### Install global configuration
echo -n "Installing dotfile configuration:"
fi
### Symlink the various dotfiles into place
-dotfiles="
+dotfiles="
bash_profile bash_logout bashrc inputrc bash_completion
- emacs emacs-calc
+ emacs emacs-calc
vm mailrc signature
gitconfig cgrc stgitrc tigrc
lisp-init.lisp:.cmucl-init.lisp
mv $ft.new $ft
echo " $target"
done
-echo " all done."
+echo " all done."
### Set up the Emacs config
$echon "Finding a suitable emacs:$echoc"
$echon " $elib:$echoc"
if $false $emacs >/dev/null 2>&1 --no-site-file --batch --eval '
(progn
- (setq load-path (nconc load-path (list "~/lib/emacs")))
- (kill-emacs (condition-case nil
- (progn (load-library "'"$elib"'") 0)
+ (setq load-path (nconc load-path (list "~/lib/emacs")))
+ (kill-emacs (condition-case nil
+ (progn (load-library "'"$elib"'") 0)
(error 1))))'; then
echo " already installed."
else
echo " done."
fi
done
-echo " all done."
+echo " all done."
$echon "Setting up Emacs configuration:$echoc"
$echon " linking$echoc"
~mdw / profile / commitdiff