diff -aru -x *.o findutils-4.1.7/doc/find.texi findutils-pb/doc/find.texi
--- findutils-4.1.7/doc/find.texi	Sun May 20 21:39:37 2001
+++ findutils-pb/doc/find.texi	Fri Jun 15 14:54:04 2001
@@ -1144,6 +1144,9 @@
 @item %d
 File's depth in the directory tree; files named on the command line
 have a depth of 0.
+@item %D
+File's device number (in decimal); Useful in conjunction with inode 
+number to uniquely identify files.
 @item %F
 Type of the filesystem the file is on; this value can be used for
 @samp{-fstype} (@pxref{Directories}).
diff -aru -x *.o findutils-4.1.7/find/parser.c findutils-pb/find/parser.c
--- findutils-4.1.7/find/parser.c	Sun May 20 21:39:37 2001
+++ findutils-pb/find/parser.c	Fri Jun 15 13:01:01 2001
@@ -1358,7 +1358,7 @@
 	  if (*scan2 == '.')
 	    for (scan2++; ISDIGIT (*scan2); scan2++)
 	      /* Do nothing. */ ;
-	  if (strchr ("abcdfFgGhHiklmnpPstuU", *scan2))
+	  if (strchr ("abcdDfFgGhHiklmnpPstuU", *scan2))
 	    {
 	      segmentp = make_segment (segmentp, format, scan2 - format,
 				       (int) *scan2);
@@ -1422,6 +1422,7 @@
     case 'b':			/* size in 512-byte blocks */
     case 'c':			/* ctime in `ctime' format */
     case 'C':			/* ctime in user-specified strftime format */
+    case 'D':			/* filesystem id */
     case 'F':			/* filesystem type */
     case 'G':			/* GID number */
     case 'g':			/* group name */
diff -aru -x *.o findutils-4.1.7/find/pred.c findutils-pb/find/pred.c
--- findutils-4.1.7/find/pred.c	Sun May 20 21:39:37 2001
+++ findutils-pb/find/pred.c	Fri Jun 15 13:24:28 2001
@@ -566,6 +566,10 @@
 	case 'd':		/* depth in search tree */
 	  fprintf (fp, segment->text, curdepth);
 	  break;
+	case 'D':		/* filesystem id */
+	  fprintf (fp, segment->text,
+	           human_readable ((uintmax_t) stat_buf->st_dev, hbuf, 1, 1));
+	  break;
 	case 'f':		/* basename of path */
 	  fprintf (fp, segment->text, base_name (pathname));
 	  break;