Mercurial > emacs

comparison lib-src/rcs-checkin @ 88155:d7ddb3e565de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sync with trunk
author Henrik Enberg <henrik.enberg@telia.com>
date Mon, 16 Jan 2006 00:03:54 +0000
parents 23a1cea22d13
children
comparison
equal deleted inserted replaced
88154:8ce476d3ba36 88155:d7ddb3e565de
1 #! /bin/sh 1 #! /bin/sh
2 2
3 # This script accepts any number of file arguments and checks them into RCS. 3 # This script accepts any number of file arguments and checks them into RCS.
4 4
5 # Copyright (C) 1993, 1994, 1995, 2001, 2002 Free Software Foundation, Inc. 5 # Copyright (C) 1993, 1994, 1995, 2001, 2002, 2003, 2004,
6 # 2005 Free Software Foundation, Inc.
6 # 7 #
7 # This file is part of GNU Emacs. 8 # This file is part of GNU Emacs.
8 # 9 #
9 # GNU Emacs is free software; you can redistribute it and/or modify 10 # GNU Emacs is free software; you can redistribute it and/or modify
10 # it under the terms of the GNU General Public License as published by 11 # it under the terms of the GNU General Public License as published by
16 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 17 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 # GNU General Public License for more details. 18 # GNU General Public License for more details.
18 # 19 #
19 # You should have received a copy of the GNU General Public License 20 # You should have received a copy of the GNU General Public License
20 # along with GNU Emacs; see the file COPYING. If not, write to the 21 # along with GNU Emacs; see the file COPYING. If not, write to the
21 # Free Software Foundation, Inc., 59 Temple Place - Suite 330, 22 # Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
22 # Boston, MA 02111-1307, USA. 23 # Boston, MA 02110-1301, USA.
23 24
24 # Arguments which are detectably either RCS masters (with names ending in ,v) 25 # Arguments which are detectably either RCS masters (with names ending in ,v)
25 # or Emacs version files (with names of the form foo.~<number>~) are ignored. 26 # or Emacs version files (with names of the form foo.~<number>~) are ignored.
26 # For each file foo, the script looks for Emacs version files related to it. 27 # For each file foo, the script looks for Emacs version files related to it.
27 # These files are checked in as deltas, oldest first, so that the contents of 28 # These files are checked in as deltas, oldest first, so that the contents of
113 ls_l=`ls -l "$file"` || exit 114 ls_l=`ls -l "$file"` || exit
114 owner=-w`expr " $ls_l" : " $ls_owner_pattern"` || owner= 115 owner=-w`expr " $ls_l" : " $ls_owner_pattern"` || owner=
115 ci -d -q -u $owner -m"entered into RCS" "$file" || exit 116 ci -d -q -u $owner -m"entered into RCS" "$file" || exit
116 done 117 done
117 118
119 # arch-tag: 89c86949-ef04-4380-838b-bc1444dcb074