--- nono/lib/object_id.pl	2026/04/29 17:05:15	1.1
+++ nono/lib/object_id.pl	2026/04/29 17:05:52	1.1.1.3
@@ -20,7 +20,7 @@
 	while (<IN>) {
 		# Remove comments.
 		chomp;
-		s/#.*$//;
+		s/^#.*$//;
 		next if /^$/;
 
 		@names = split(/\s+/);
@@ -28,6 +28,7 @@
 		if (@names == 1) {
 			$names[1] = $names[0];
 		}
+		$names[1] =~ s/^\"(.*)\"$/$1/;
 
 		# %n があれば 0..(n-1) に展開する
 		if ($names[0] =~ /%(\d+)/) {