| 
					
				 | 
			
			
				@@ -240,7 +240,11 @@ communication channel." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	       (org-time-string-to-time 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		(or (org-element-property :PUBDATE headline) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		    (error "Missing PUBDATE property")))))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-	   (title (org-element-property :raw-value headline)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+	   (title (replace-regexp-in-string 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		   org-bracket-link-regexp 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		   (lambda (m) (or (match-string 3 m) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+				   (match-string 1 m))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		   (org-element-property :raw-value headline))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	   (publink 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	    (or (and hl-perm (concat (or hl-home hl-pdir) hl-perm)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		(concat 
			 | 
		
	
	
		
			
				| 
					
				 | 
			
			
				@@ -319,8 +323,8 @@ as a communication channel." 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (ifile (plist-get info :input-file)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	 (publink 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 	  (concat (file-name-as-directory blogurl) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-		   (file-name-nondirectory 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				-		    (file-name-sans-extension ifile)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		  (file-name-nondirectory 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				+		   (file-name-sans-extension ifile)) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				 		  "." rssext))) 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				     (format 
			 | 
		
	
		
			
				 | 
				 | 
			
			
				      "\n<title>%s</title> 
			 |