aboutsummaryrefslogtreecommitdiffstats
path: root/admin
diff options
context:
space:
mode:
Diffstat (limited to 'admin')
-rw-r--r--admin/ChangeLog5
-rw-r--r--admin/notes/BRANCH7
-rw-r--r--admin/notes/copyright28
-rwxr-xr-xadmin/revdiff137
4 files changed, 22 insertions, 155 deletions
diff --git a/admin/ChangeLog b/admin/ChangeLog
index 8fd3b828a71..a43dbe931f0 100644
--- a/admin/ChangeLog
+++ b/admin/ChangeLog
@@ -1,3 +1,8 @@
12010-01-20 Glenn Morris <rgm@gnu.org>
2
3 * revdiff: Remove file that only works with CVS, and isn't really
4 needed with Bazaar (given the in-built revision options of bzr diff).
5
12010-01-12 Glenn Morris <rgm@gnu.org> 62010-01-12 Glenn Morris <rgm@gnu.org>
2 7
3 * emacs-pretesters, make-announcement: Use bug-gnu-emacs rather 8 * emacs-pretesters, make-announcement: Use bug-gnu-emacs rather
diff --git a/admin/notes/BRANCH b/admin/notes/BRANCH
index 863d86a1ed9..258fcd95566 100644
--- a/admin/notes/BRANCH
+++ b/admin/notes/BRANCH
@@ -1,11 +1,10 @@
1This file describes the CVS branch in which it is maintained. 1This file describes the bzr branch in which it is maintained.
2Everything below the line is branch-specific. 2Everything below the line is branch-specific.
3________________________________________________________________________ 3________________________________________________________________________
4 4
5This is the trunk (sometimes mistakenly called "HEAD"). 5This is the trunk (sometimes mistakenly called "HEAD").
6When people say "use CVS emacs", this is the branch they are talking 6When people say "use the development version of Emacs" or the
7about. Likewise, a "cvs checkout" without the "-r" option results in 7"bzr version of Emacs", this is the branch they are talking about.
8this branch.
9 8
10Emacs development takes place on the trunk. Most of the time, Emacs 9Emacs development takes place on the trunk. Most of the time, Emacs
11hackers add to it relatively free of constraint (aside from proper 10hackers add to it relatively free of constraint (aside from proper
diff --git a/admin/notes/copyright b/admin/notes/copyright
index 40c45404f75..f4ceb273c73 100644
--- a/admin/notes/copyright
+++ b/admin/notes/copyright
@@ -24,9 +24,9 @@ the file.
24 24
252. When installing code written by someone else, the ChangeLog entry 252. When installing code written by someone else, the ChangeLog entry
26should be in the name of the author of the code, not the person who 26should be in the name of the author of the code, not the person who
27installs it. I think it is helpful to put the author (if not yourself) 27installs it. I think it is helpful to put the author (if not yourself)
28in the CVS log as well; and to not install any of your own changes in 28in the commit log as well (you can also use bzr commit's "--author"
29the same commit. 29option); and to not install any of your own changes in the same commit.
30 30
313. With images, add the legal info to a README file in the directory 313. With images, add the legal info to a README file in the directory
32containing the image. 32containing the image.
@@ -38,17 +38,17 @@ legal notices, consider if you should add a copyright statement.
38right thing to do. 38right thing to do.
39 39
40 40
41Every non-trivial file distributed through the Emacs CVS should be 41Every non-trivial file distributed through the Emacs repository should be
42self-explanatory in terms of copyright and license. This includes 42self-explanatory in terms of copyright and license. This includes
43files that are not distributed in Emacs releases (for example, the 43files that are not distributed in Emacs releases (for example, the
44admin/ directory), because the whole Emacs CVS is publicly 44admin/ directory), because the whole Emacs repository is publicly
45available. 45available.
46 46
47The definition of triviality is a little vague, but a rule of thumb is 47The definition of triviality is a little vague, but a rule of thumb is
48that any file with less than 15 lines of actual content is trivial. If 48that any file with less than 15 lines of actual content is trivial. If
49a file is auto-generated (eg ldefs-boot.el) from another one in the 49a file is auto-generated (eg ldefs-boot.el) from another one in the
50CVS, then it does not really matter about adding a copyright statement 50repository, then it does not really matter about adding a copyright
51to the generated file. 51statement to the generated file.
52 52
53Legal advice says that we could, if we wished, put a license notice 53Legal advice says that we could, if we wished, put a license notice
54even in trivial files, because copyright law in general looks at the 54even in trivial files, because copyright law in general looks at the
@@ -67,8 +67,8 @@ file "years" in this directory). The PDF versions of refcards etc
67should display copyright notices (an exception to the rule about 67should display copyright notices (an exception to the rule about
68"generated" files), but these can just display the latest year. The 68"generated" files), but these can just display the latest year. The
69full list of years should be kept in comments in the source file. If 69full list of years should be kept in comments in the source file. If
70these are distributed in CVS, check in a regenerated version when the 70these are distributed in the repository, check in a regenerated
71tex files are updated. 71version when the tex files are updated.
72 72
73Copyright changes should be propagated to any associated repositories 73Copyright changes should be propagated to any associated repositories
74(eg Gnus, MH-E), but I think in every case this happens automatically 74(eg Gnus, MH-E), but I think in every case this happens automatically
@@ -115,7 +115,7 @@ author should be removed and the year(s) transferred to the FSF); or
115else it is possible the file should not be in Emacs at all (please 115else it is possible the file should not be in Emacs at all (please
116report!). 116report!).
117 117
118Note that it seems painfully clear that one cannot rely on CVS logs, 118Note that it seems painfully clear that one cannot rely on commit logs,
119or even ChangeLogs, for older changes. People often installed changes 119or even ChangeLogs, for older changes. People often installed changes
120from others, without recording the true authorship. 120from others, without recording the true authorship.
121 121
@@ -555,10 +555,10 @@ system)
555 obviously good): 555 obviously good):
556 556
557 557
558Is it OK to just `cvs remove' a file for legal reasons, or is 558Is it OK to just `bzr remove' a file for legal reasons, or is
559something more drastic needed? A removed file is still available from 559something more drastic needed? A removed file is still available from
560CVS, if suitable options are applied. (This CVS issue obviously does 560the repository, if suitable options are applied. (This issue obviously
561not affect a release). 561does not affect a release).
562 rms: will ask lawyer 562 rms: will ask lawyer
563 563
564 564
@@ -600,7 +600,7 @@ The EMACS_22_BASE branch was changed to GPLv3 (or later) 2007/07/25.
600Some notes: 600Some notes:
601(see http://lists.gnu.org/archive/html/emacs-devel/2007-07/msg01431.html) 601(see http://lists.gnu.org/archive/html/emacs-devel/2007-07/msg01431.html)
602 602
6031. There are some files in Emacs CVS which are not part of Emacs (eg 6031. There are some files in the Emacs tree which are not part of Emacs (eg
604those included from Gnulib). These are all copyright FSF and (at time 604those included from Gnulib). These are all copyright FSF and (at time
605of writing) GPL >= 2. rms says may as well leave the licenses of these 605of writing) GPL >= 2. rms says may as well leave the licenses of these
606alone (may import them from Gnulib again). These are: 606alone (may import them from Gnulib again). These are:
diff --git a/admin/revdiff b/admin/revdiff
deleted file mode 100755
index 7a1e93a64fe..00000000000
--- a/admin/revdiff
+++ /dev/null
@@ -1,137 +0,0 @@
1#! /usr/bin/perl
2
3# Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009,
4# 2010 Free Software Foundation, Inc.
5#
6# This file is part of GNU Emacs.
7
8# GNU Emacs is free software: you can redistribute it and/or modify
9# it under the terms of the GNU General Public License as published by
10# the Free Software Foundation, either version 3 of the License, or
11# (at your option) any later version.
12
13# GNU Emacs is distributed in the hope that it will be useful,
14# but WITHOUT ANY WARRANTY; without even the implied warranty of
15# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16# GNU General Public License for more details.
17
18# You should have received a copy of the GNU General Public License
19# along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
20
21
22use File::Basename;
23
24if (@ARGV < 3)
25{
26 print <<USAGE;
27revdiff FILE OLD NEW
28
29Get a diff of FILE between revisions OLD and NEW. Store the
30diff in a file named FILE-OLD-NEW.diff.
31
32If OLD is `-' use FILE's current revision for OLD. If OLD is
33`-<number>', use the Nth revision before the current one for OLD.
34
35If NEW is +<number> or -<number>, build diffs between revisions OLD
36and OLD +/- <number>.
37
38Examples:
39
40revdiff FILE - -1 get the latest change of FILE
41revdiff FILE -1 +1 also gets the latest change of FILE
42revdiff FILE 1.500 +2 get diffs 1.500-1.501 and 1.501-1.502.
43
44USAGE
45 exit 1;
46}
47
48$file = shift @ARGV;
49$old = shift @ARGV;
50
51sub diffit
52{
53 my ($old, $new) = @_;
54 print "cvs diff -r$old -r$new $file >$file-$old-$new.diff\n";
55 system "cvs diff -r$old -r$new $file >$file-$old-$new.diff";
56}
57
58sub current_revision ($)
59{
60 my ($file) = @_;
61 my $dir = dirname ($file);
62 my $base = basename ($file);
63 my $entries = "$dir/CVS/Entries";
64 die "Can't find $entries" unless -f $entries;
65 open (IN, "<$entries") or die "Cannot open $entries";
66 my $rev;
67 while ($line = <IN>)
68 {
69 if ($line =~ m,/$base/([^/]+),)
70 {
71 $rev = $1;
72 break;
73 }
74 }
75 die "Cannot determine current revision of $file" unless $rev;
76 close (IN);
77 return $rev;
78}
79
80if ($old eq "-")
81 {
82 $old = current_revision ($file);
83 }
84elsif ($old =~ /^-(\d+)$/)
85 {
86 my $offset = $1;
87 $old = current_revision ($file);
88 die "Internal error" unless $old =~ /(.*)\.(\d+)$/;
89 my $minor = $2 - $offset;
90 $old = sprintf ("%d.%d", $1, $minor);
91 }
92
93while (@ARGV)
94 {
95 my $new = shift @ARGV;
96 if ($new =~ /^[+]\d+$/)
97 {
98 my $n = $new;
99 for ($i = 0; $i < $n; ++$i)
100 {
101 unless ($old =~ /(.*)\.(\d+)$/)
102 {
103 die "Internal error";
104 }
105 my $j = $2 + 1;
106 $new = "$1.$j";
107 diffit ($old, $new);
108 $old = $new;
109 }
110 }
111 elsif ($new =~ /^[-]\d+$/)
112 {
113 my $n = - $new;
114 for ($i = 0; $i < $n; ++$i)
115 {
116 unless ($old =~ /(.*)\.(\d+)$/)
117 {
118 die "Internal error";
119 }
120 my $j = $2 - 1;
121 $new = "$1.$j";
122 diffit ($new, $old);
123 $old = $new;
124 }
125 }
126 else
127 {
128 diffit ($old, $new);
129 $old = $new;
130 }
131 }
132
133# Local Variables:
134# mode: cperl
135# End:
136
137# arch-tag: 2798b20d-c7f2-4c78-8378-7bb529c36a09