Re: Why doesn't this work?
Steve Youngs <youngs(a)xemacs.org> writes:
I think I've been staring at this for too long, I just can't
figure
out what is going wrong here. :-(
Take a look at this function and tell me why it *only* commits the
Makefile and *not* the ChangeLog...
Isn't this because you're missing a space at the end of
'pkg-log-entry-inc-ver ? It's trying to run
cvs commit -m "Increment VERSION in Makefile"ChangeLog Makefile
rather than
cvs commit -m "Increment VERSION in Makefile" ChangeLog Makefile
On a side note, what is the purpose of the pattern
(let ((files (setq files "ChangeLog Makefile"))))
? It seems like the setq is defeating any use of let there:
(let ((files "b"))
(let ((files (setq files "ChangeLog")))
(print files))
(print files))
outputs "ChangeLog" and "ChangeLog", whereas
(let ((files "b"))
(let ((files "ChangeLog"))
(print files))
(print files))
outputs "ChangeLog" and "b"
--- pkg-build.el 2002/06/01 20:56:41 1.6
+++ pkg-build.el 2002/06/02 00:50:52
＠＠ -136,7 +136,7 ＠＠
:group 'pkg-build
:type 'string)
-(defcustom pkg-log-entry-inc-ver "\"Increment VERSION in Makefile
\""
+(defcustom pkg-log-entry-inc-ver "\"Increment VERSION in Makefile \"
"
"*CVS commit log entry.
It is used when committing a package's Makefile & ChangeLog after
--
If nature has made any one thing less susceptible than all others of
exclusive property, it is the action of the thinking power called an
idea, which an individual may exclusively possess [only] as long as he
keeps it to himself.... -- Thomas Jefferson