* lisp/eshell/em-unix.el (eshell/sudo): Explicitly drop return value.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f06856b475e8b88d6e51cf63f9106ba1c9927915..f46fbdcc9eda099d6c05196ccad4a61079360f95 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,9 +1,13 @@
+2012-09-09  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * eshell/em-unix.el (eshell/sudo): Explicitly drop return value.
+
 2012-09-09  Alan Mackenzie  <acm@muc.de>
 
-       * progmodes/cc-engine.el (c-state-cache-init): Initialise
-       c-state-semi-nonlit-pos-cache\(-limit\)? properly.
-       (c-record-parse-state-state): record
-       c-state-semi-nonlit-pos-cache\(-limit\)?.
+       * progmodes/cc-engine.el (c-state-cache-init):
+       Initialise c-state-semi-nonlit-pos-cache\(-limit\)? properly.
+       (c-record-parse-state-state):
+       Record c-state-semi-nonlit-pos-cache\(-limit\)?.
 
 2012-09-09  Andreas Schwab  <schwab@linux-m68k.org>
 

diff --git a/lisp/eshell/em-unix.el b/lisp/eshell/em-unix.el
index 58402e375081a479bac54d5f10239fcd1f80f273..d3ddab8af1bb3c518ae7276a34c4efe34056e9d8 100644 (file)
--- a/lisp/eshell/em-unix.el
+++ b/lisp/eshell/em-unix.el
@@ -1111,7 +1111,7 @@ Execute a COMMAND as the superuser or another USER.")
                                  (substring prefix 0 -1) user host dir)
                        (format "/sudo:%s@%s:%s" user host dir))))
                ;; Ensure, that Tramp has connected to that construct already.
-               (file-exists-p default-directory)
+               (ignore (file-exists-p default-directory))
                (eshell-named-command (car orig-args) (cdr orig-args))))))))
 
 (put 'eshell/sudo 'eshell-no-numeric-conversions t)

diff --git a/src/buffer.c b/src/buffer.c
index 187277d663ba1e8137662bc8d89645b7b6d7312b..3af45122a0da6324a837d0b8b411aa8b64c4a67a 100644 (file)
--- a/src/buffer.c
+++ b/src/buffer.c
@@ -44,7 +44,7 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 #include "keymap.h"
 #include "frame.h"
 
-struct buffer *current_buffer;         /* the current buffer */
+struct buffer *current_buffer;         /* The current buffer.  */
 
 /* First buffer in chain of all buffers (in reverse order of creation).
    Threaded through ->header.next.buffer.  */
@@ -74,12 +74,12 @@ struct buffer alignas (GCALIGNMENT) buffer_defaults;
    and the corresponding slot in buffer_defaults is not used.
 
    If a slot in this structure corresponding to a DEFVAR_PER_BUFFER is
-   zero, that is a bug */
+   zero, that is a bug.  */
 
 struct buffer buffer_local_flags;
 
 /* This structure holds the names of symbols whose values may be
-   buffer-local.  It is indexed and accessed in the same way as the above. */
+   buffer-local.  It is indexed and accessed in the same way as the above.  */
 
 struct buffer alignas (GCALIGNMENT) buffer_local_symbols;
 
@@ -108,7 +108,7 @@ static void call_overlay_mod_hooks (Lisp_Object list, Lisp_Object overlay,
 static void swap_out_buffer_local_variables (struct buffer *b);
 static void reset_buffer_local_variables (struct buffer *, bool);
 
-/* Alist of all buffer names vs the buffers. */
+/* Alist of all buffer names vs the buffers.  */
 /* This used to be a variable, but is no longer,
  to prevent lossage due to user rplac'ing this alist or its elements.  */
 Lisp_Object Vbuffer_alist;
@@ -127,7 +127,7 @@ static Lisp_Object Qpermanent_local_hook;
 
 static Lisp_Object Qprotected_field;
 
-static Lisp_Object QSFundamental;      /* A string "Fundamental" */
+static Lisp_Object QSFundamental;      /* A string "Fundamental".  */
 
 static Lisp_Object Qkill_buffer_hook;
 static Lisp_Object Qbuffer_list_update_hook;