X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/09d9db2c4921cb2eb0974892164dd03d6bffdd80..6420d28b9ab9c09b69992e05e0e63c3bbaf2646d:/lisp/generic-x.el

diff --git a/lisp/generic-x.el b/lisp/generic-x.el
index bce03331a2..5205a6811f 100644
--- a/lisp/generic-x.el
+++ b/lisp/generic-x.el
@@ -543,7 +543,7 @@ like an INI file.  You can add this hook to `find-file-hook'."
   (interactive)
   (let ((compilation-buffer-name-function
 	 (function
-	  (lambda(ign)
+	  (lambda (_ign)
 	    (concat "*" (buffer-file-name) "*")))))
     (compile
      (concat (w32-shell-name) " -c " (buffer-file-name)))))
@@ -1705,6 +1705,7 @@ like an INI file.  You can add this hook to `find-file-hook'."
     "efs"
     "ext2"
     "ext3"
+    "ext4"
     "hfs"
     "hpfs"
     "iso9660"
@@ -1722,6 +1723,7 @@ like an INI file.  You can add this hook to `find-file-hook'."
     "cifs"
     "usbdevfs"
     "sysv"
+    "sysfs"
     "tmpfs"
     "udf"
     "ufs"