Mercurial > hg > xemacs-beta
diff etc/aliases.ksh @ 428:3ecd8885ac67 r21-2-22
Import from CVS: tag r21-2-22
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:28:15 +0200 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/etc/aliases.ksh Mon Aug 13 11:28:15 2007 +0200 @@ -0,0 +1,60 @@ +### aliases.ksh --- Useful shortcuts for XEmacs source hackers + +# Copyright (C) 1998 Free Software Foundation, Inc. + +# Author: Steve Baur +# Keywords: internal + +# This file is part of XEmacs. + +# XEmacs is free software; you can redistribute it and/or modify it +# under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 2, or (at your option) +# any later version. + +# XEmacs 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 XEmacs; see the file COPYING. If not, write to +# the Free Software Foundation, Inc., 59 Temple Place - Suite 330, +# Boston, MA 02111-1307, USA. + +# Shortcuts for sh-derived Unix shells (ksh, zsh, bash) + +# From Steve Baur <steve@xemacs.org> +# Run temacs as XEmacs +function runtemacs +{ + if [ ! -x temacs ]; then + echo "Must be in temacs source directory to run temacs." + return 1; + fi + + ./temacs -batch -l loadup.el run-temacs "$@" +} + +# From Adrian Aichner <aichner@ecf.teradyne.com> +# Convenience function for running build-report +function mak +{ + make "$@" 2>&1 | tee beta.err +} +# export -f mak + +# From Karl Hegbloom <karlheg@bittersweet.inetarena.com> +# igrep from the shell command line +function listargs +{ + for arg in "$@"; do + echo " \"$arg\"" + done +} + +function igrep +{ + exp="$1"; shift + gnudoit -q "(igrep nil \"$exp\" '($(listargs "$@")))" +}